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SEQ 0001 

1 -REM & 

e 

3 

4 

5 

6 

7 

8 

“* 
10 
11 
12 
13 IDENTIFICATION 

ee Ry ie are Sa ae alg 

15 

16 

4 PRODUCT CODE:  AC-F636A-MC 
> PRODUCT NAME: CKFPCAOQ FP1I1F FLTG PNT PRT C 
$3 PRODUCT DATE: OCTOBER, 1979 
t MAINTAINER: DIAGNOSTIC ENGINEERING 
+4 AUTHOR: ANTHONY VEZZA, DAN MILLEVILLE 
27 
28 THE INFORMATION IN THIS DOCUMENT IS SUBJECT TU CHANGE WITHOUT 
29 NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
30 EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
ay RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
33 * NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 

34 SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
- AFFILIATED COMPANIES. 

t COPYRIGHT (C) 1979 BY DIGITAL EQUIPMENT CORPORATION 


CKFPCAO FPIIF FLTG PNT PRT C 


41 


AAAARASAAAMNMAMNMNMAANNMAAR ES RELL RS 
SISTFER ZS SRVKALUNAS SEREAESA 


vr 


MACRO M1111 24=SEP=79 15:03 PAGE 3 


HISTORY 


NO CHANGES 10 THE 11/34 FLOATING POINT DIAGNOSTIC PART ‘*A‘ WERE 
POUND TO BE NEEDED TO ADAPT IT FOR USE ON THE 11/44, 


THE FOLLOWING WAS ADDED TO THE 11/34 FLOATING POINT DIAGNOSTIC 
TO MAKE THE ‘B' VERSION COVER THE 11/44: 


1. TEST 22 = PROCESSOR LOOKS TO SEE IF APT IS CON- 
TROLLING THE TEST, AND_IF IT IS, CHECKS TO SEE 
IF THE USER HAS SELECTED THIS TEST BY CHECKING 
BIT 7 IN THE SWITCH REGISTER. IT HAS ALSO BEEN 
CHANGED SO THAT IF BIT 7 IS *ONE*, THE CODE WILL 
SELECT THE TEST. 


THE FOLLOWING WAS ADDED TO THE 11/34 oe POINT DIAGNOSTIC 
TO MAKE THE ‘C" VERSION COVER THE 11/44 


1. TEST 76 = CHECKS THAT FP PROCESSOR DOESN'T ACCESS 
D-SPACE UNTIL CONDITIONS WARRANT. 


2. TEST 77 = CHECKS THAT  SR1 MATCHES WHAT ACTUALLY 
HAPPENED TO THE REGISTER OF THE INSTRUCTION, AND 
A VALUE OF AUTO INCREMENT/DECREMENT WAS 


SEQ 0002 


CKFPCAO FPIIF FLTG PNT PRT C 


108 


— et a od 3 2) 1) at ot i es 


NORSNIA —  —2 Ss - e 
WO OW NANNE WI =353 


MACRO M1111 


D 
24=SEP=79 15:03 PAGE 4 


CONTENTS 
ABSTRACT 


REQUIREMENTS 
5 } EQUIPMENT 


STORAGE 
2.3 PRELIMINARY PROGRAMS 
LOADING PROCEDURE 
we nen PROCEDURE 


CONTROL SWITCH SETTINGS 
4.2 STARTING ADDRESS 


4.3 PROGRAM AND OPERATOR INTERACTION 


OPERATING PROCEDURE 
5.1 OPERATIONAL SWITCH SETTINGS 
5.3 OPERATOR ACTION 


ERRORS 
6.1 SUMMARY 
6.2 ERROR RECOVERY 


RESTRICTIONS 
7.1 STARTING RESTRICTIONS 
es OPERATING RESTRICTIONS 


ee eee 

EXECUTION TIMES 

STACK POINTER 
S_COUN 


APP ING 
SOFTWARE SWITCH REGISTER 
INTERRUPTS TESTS 

ACT, APT AND XXDP COMPATIBILITY 


DCOSCRIPTION 
CKFPCAO 


P°) 
-—-O NOW AW 


= 
= 


=r voy 0.00 Co Go Go G0 Co 


ou 
no“) 
——4 
— 
2 
i) 


CKFPCAO 


SEQ 0003 


CKFPCAO FPTIF FLTG PNT PRT C 


131 


138 


MACRO M1111 


E 
24-SEP=79 15:03 PAGE 5 


ABSTRACT 


THE THREE PROGRAMS: 
CKFPAAO CKFPBAO CKFPCAO 


ARE DESIGN TO DETECT AND REPORT LOGIC FAULTS IN THE 
PDP 11/44 FP11=-F FLOATING POINT PROCESSOR. THE 


ALL BRANCH MICRO TESTS (BUT'S) AND VERIFY ALL THE 
LOGIC. THEY CONSIST OF 161 (OCT) INDIVIDUAL TESTS 
SEQUENCED TO DETECT AND ATTEMPT TO IDENTIFY FAULTS 
WITH A MINIMUM HARDWARE OR SOFTWARE LEVEL. _ THE 
TESTS ARE PARTIONED INTO THREE STAND-ALONE PROGRAMS 
DESCRIBED BELOW. 


NOTE THAT ERROR REPORTS IN THESE PROGRAMS ARE BASED 
UPON THE KNOWLEDGE THAT ALL PREVIOUS TESTS HAVE BEEN 
RUN AND IN MOST CASE THAT THERE IS ONLY A_ SINGLE 
POINT FAULT IN THE FP11-F. IF THE PROGRAMS OR TESTS 
he IN ORDER THEN ERROR MESSAGES MAY NOT BE 


A. CKFPAAO 

CKFPAAO TESTS: 
LDFPS 
STFPS 


CFCC 
ohcy" SETD, SETI AND SETL 


LDF AND LDD (ALL SOURCE MODES) 
STD (MODE 0 AND 1) 
ADDF, ADDD AND SUBD (MOST CONDITIONS) 


8. CKF PBAO 


CKFPBAO TESTS: 
ADDF, ADDD AND SUBD ‘ALL CONDITIONS NOT 
Mp A IN CKFPAAQ) 
CMPD AND CMP. 
DIVD AND DIVE 
MULD AND MULF 
MODD AND MODF 


C. CKFPCAO 
CKFPCAO TESTS: 


STF AND STD (ALL MODES) 
STCFD AND STCDF 


NEGF AND NEGD 


SEQ 0004 
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SEQ 0005 


182 ABSF AND ABS 

183 TSTF AND TSTD 

184 NEGF, ABSF AND TSTF (ALL SOURCE MODES) 

185 NEGF, ABSF AND TSTF (ALi SOURCE MODES) 

186 LDFPS (ALL SOURCE MODES) 

187 LDCIF AND LDCLF 

188 LDCID AND LDCLD 

189 LDEXP 

190 STFPS (ALL DESTINATION MODES) 

191 STCFL AND STCFI 

192 STCDL AND STCDI 

193 STEXP 

194 STST : 
195 I AND D SPACE TESTS (ALL MODES AND REGS 0 AND 7) 
| AUTO INCREMENT/DECREMENT CHECK = SR1 (ALL MODES AND REGS 1 AND 7) 
198 

199 és REQUIREMENTS 

a a 7 i I ea 

201 

202 £.1 EGUIPMENT 

203 A PDP 11/44 WITH CONSOLE AND AN FP11-F_ FLOATING 
206 POINT PROCESSOR. NOTE THAT A SPECIAL INTERRUPTS TEST 
205 MODULE IS BEING DESIGNED FOR USE IN THE MANUFAC~ 
206 TURING ENVIRONMENT. WHEN THIS DEVICE IS PRESENT THE 
207 PROGRAM CKFPBAO WILL MAKE USE OF IT TO TEST THE FPP 
4 INTERRUPT ON BUS REQUEST FUNCTIONS. 

$i9 2.2 STORAGE 

212 ALL THREE PROGRAM REQUIRE A MEMORY SYSTEM OF AT 
Siz LEAST 16K TO LOAD AND RUN. 

$12 2.3 PRELIMINARY PROGRAMS 

217 THESE THREE DIAGNOSTICS WILL ASSUME THAT THE PDP 
218 11/44 CENTRAL PROCESSOR IS FAULTLESS, THEREFORE WHEN 
219 IN DOUBT RUN THE PDP 11/44 PROCESSOR DIAGNOSTICS 














BEFORE THESE FP11-F DIAGNOSTICS. 


LOADING PROCEDURE 


THE PROGRAMS WILL BE SUPPLIED ON _ THE USUAL 
DIAGNOSTIC MEDIA. REFER TQ THE XXDP OPERATING 
MANUAL FOR FURTHER INFORMATION. 


STARTING PROCEDURE 


of CONTROL SWITCH SETTINGS 
SEE SECTION 5.1 
PROGRAM AND OPERATOR ACTION 
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1. LOAD PROGRAM INTO MEMORY 

é. LOAD ADDRESS 200 

3. SET CONSOLE SWITCHES (IF CONSOLE IS PRESENT) 

oe PRESS START. 
ON FIRST PASS, THE PROGRAM 
WILL IDENTIFY ITSELF. NOTE THAT IF THERE IS 
NO PHYSICAL CONSOLE THE PROGRAM WII.L REQUEST 
THE OPERATOR FOR INITIAL VALUE FOR_ THE 
SOFTWARE SWITCH REGISTER (SEE SECTION 8.5). 
OF RUNNING UNDER ACT, APT OR CHAIN THIS DOES 
NOT APPLY. 

De THE PROGRAM WILL LOOP AND AN END OF PASS AND 
ERROR SUMMARY WILL BE TYPED AT THE END OF 
FVERY PASS. 


OPERATING PROCEDURE 


OPERATIONAL SWITCH SETTINGS 
THE SWITCH SETTING ARE: 


SW<15>=1.. 100000 HALT ON ERROR 
SW<14>=1.. 40000 LOOP ON CURRENT TEST 
SW<13>=1... 20000 INHIBIT ERROR TYPE OUTS 
SW<12>=1.. 10000 INHIBIT T-BIT TRAPPING 
SW<11>=1... 4000 INHIBIT ITERATIONS 
Sw<10>=1... 2000 RING TTY BELL ON ERROR 
te te 1000 LOOP ON ERROR 
SW<8>=1. 400 LOOP ON TEST SPECIFIED 
THROUGH SW<0> 
SW<7>=1.... 200 PRINT _ERROR SUMMARY 
SW<13>=1, Rin APPLIES 
PROGRAM CKFPAAQ. 
SW<7>=1.... 200 SELECT CORRECT INTERRUPT 
PROGRAM CKFPBAO. 
ERRORS 
SUMMARIES 


IN PROGRAM CKFPAAQ TESTS 1 AND 11 HAVE A SPECIAL 
ERROR SUMMARY FEATURE. THESE TWO TEST RUN MANY 
TEST PATTERNS THROUGH THE LOGIC. AFTER AN _ ERROR 
IS ENCOUNTERED, ONLY THE FIRST FIVE ERRORS ARE 
REPORTED (TYPED ON THE TTY). EVERY ERROR THOUGH IS 
LOGGED AND AN ERROR SUMMARY IS PRINTED WHEN THE 
TEST IS COMPLETE. NOTE THAT IS SwW<13>=1 THIS 
SUMMARY WILL NOT BE TYPED UNLESS SW<7>=1. IN OTHER 
WORDS TO GET JUST AN ERROR SUMMARY FROM EITHER OF 
THESE TWO TESTS 1 AND 11 IN PROGRAM CKFPAAQO BOTH 
SWITCHES 13 AND 7 MUST = 1. 


ERROR RECOVERY 


SEQ 0006 
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Ef 
SEQ 0007 
Sw<15:9>=0... MOST ERRORS WILL CAUSE EXECUTION 
GO TO THE START OF THE NEXT TEST 
AFTER THE MESSAGE IS TYPED. A_ FEW 
TESTS ARE IN SECTIONS. _IN THESE 


TESTS AN ERROR WILL CAUSE EXECUTION 
TC GO TO THE NEXT SECTION AFTER THE 
MESSAGE IS TYPED 

SW<15>=1.. THE PROGRAM WILL HALT AFTER TYPING 
THE ERROR MESSAGE. PRESSING THE 
CONSOLE CONTINUE WILL CAUSE _ THE 
PROGRAM TO CONTINUE AS IF SW<15>=0. 


RESTRICTIONS 


NONE 


EXECUTION TIMES 
LESS THAN 10 SECONDS FOR FACH PROGRAM ON ANY PASS. 
STACK POINTER 


THE STACK crentin IS INITIALIZED TO 1100 IN EACH OF 
THE THREE PROGRAMS. 


PASS COUNT 


THE PROGRAM MAKES ONE PASS FOR EACH END OF PASS 


MESSAGE TYPED. THE END OF PASS MESSAGE DESCRIBES 
THE TOTAL NUMBER OF PASSES COMPLETED AND THE TOTAL 
NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE. 


T-BIT TRAPPING 


IF SW<12>=0 EACH PROGRAM WILL RUN WITH TRACE TRAPS 
ON EVERY OTHER PASS. feo PASS WILL_NOT ENABLE 
TRACE TRAPS. NOTE SW<12>=1 DISABLES T-BIT TRAPS. 


SOFTWARE SWITCH REGISTER 


IF THE USER DESIRES, A_ SOFTWARE SWITCH REGISTER CAN 
BE EXAMINED OR MODIFIED AT ANY TIME BY THE USER IF 
HE TYPES CNTRL/G WHILE THE PROGRAM IS RUNNING. THIS 
CNTRL/G WILL CAUSE THE CONTENTS OF THE SOFTWARE 
SWITCH REGISTER TO BE TYPED ON THE TTY AND ASK THE 
USER FOR A NEW VALUE. WHEN THE USER TYPES A VALUE 
AND CARRIAGE RETURN THEN THE PROGRAM WILL RESUME 
TESTING AT THE SAME POINT AT WHICH IT LEFT OFF WHEN 
THE USER TYPED CNTRL/G. NOTE THAT WHEN NOT RUNNING 
UNDER ACT, APT OR CHAIN THE USER WILL BE ASKED 
FOR A SOFTWARE SWITCH REGISTER VALUE AFTER LOADING 
ADDRESS 200 AND STARTING THE PROGRAM THE FIRST TIME 
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8.6 


THE PROGRAM 1S AFTER LOADING ONLY IF THE 
CONSOLE SwITCH REGISTER CONTAINS 177777. 


INTERRUPTS TEST 


IN PROGRAM CKFPBAQ THERE IS A SPECIAL TEST FOR 
CHECKING THE CORRECT FLOWS OF THE FPP. THIS TEST 
CAN BE RUN ONLY IF A SPECIAL TEST MODULE IS_ IN_ THE 


MANUFACTURING. IF THIS MODULE IS NOT IN THE SYSTEM 
THIS TEST WILL AUTOMATICALLY BE DESELECTED. IF THIS 
TEST MODULE IS ON THE SYSTEM AND SW<7>=1 THIS TEST 
WILL BE RUN. IF SW<7>=0, THIS TEST WILL BE 
DESELECTED. 


ACT, APT AND XXDP COMPATIBILITY 
THE SE ve ARE FULLY COMPATIBLE WITH: 


ACT 
XXDP MONITOR AND CHAIN PROGRAMS. 


PROGRAM DESCRIPTION 


STF WITH ILLEGAL ACCUMULATOR TEST 


THIS IS A TEST OF THE ST INSTRUCTION USING ILLEGAL 
ACCUMULATCR 7, MODE 0. 


FDST MODE 1, FLOATING MODE, TEST 


THIS IS A TEST OF THE STF INSTRUCTION USING FDST 
MODE 1 


FDST MODE 2 TEST 


THIS IS A TEST OF BOTH STF AND STD WITH FDST MODE 2. 
FDST MODE 2, WITH GR7, TEST 


hae IS A TEST OF STF WITH GR7 MODE 2 OR IMMEDIATE 


SEQ 0008 
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THIS 


THIS 


THIS 


THIS 
STD. 


THI 


THIS 


THIS 


THIS 


THIS 


THIS 


THIS 


S 
USING 


FDST MODE 4 TEST 


IS A TEST OF STD WITH FDST MODE 4. 
FDST MODE 3 TEST 


IS A TEST OF FDST MODE 3 USING STD. 
FDST MODE 5 TEST 


IS A TEST OF FDST MODE 5 USING STD. 
FDST MODE 6, INDEX MODE, TEST 


1S A TEST OF FDST MODE 6, INDEX MODE, USING 


FDST MODE 7, INDEX DEFERRED MODE, TEST 


4 F TEST OF FDST MODE 7, INDEX DEFERRED MODE, 


STCFD TEST 


IS A TEST OF THE STCFD INSTRUCTION. 
STCDF TEST 


IS A TEST OF THE STCDF INSTRUCTION. 
STCFD WITH ILLEGAL ACCUMULATOR TEST 


TEST STCFD WITH ILLEGAL AC 6. 
CLRD TEST 


IS A TEST OF THE CRLF AND CLRD INSTRUCTIONS. 
CLRD WITH ILLEGAL ACCUMULATOR TEST 


IS A TEST OF CLRD WITH ILLEGAL AC7. 


NEGF, ABSF AND TSTF SOURCE MODE 0 WITH ILLEGAL AC7, TEST 


IS A TEST OF THE SPECIAL DEST FLOWS USING 


THE 


SEQ 0009 
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SEQ 0010 


467 NEGD INST WITH MODE ZERO AND ILLEGAL AC7. 

469 TEST 20 NEGF, ABSF AND TSTF SOURCE MODE 0 TEST 

“71 

“72 THIS 1S A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
478 THE NEGD INSTRUCTION IS USED TO TEST MODE 0 

475 TEST 21 NEGF, ABSF AND TSTF SOURCE MODE 1 TEST 

477 

678 THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
479 THE NEGD INSTRUCTION IS USED TO TEST MODE 1 

481 TEST 22 NEGF. ABSF AND TSTF SOURCE MODE 2 TEST 

483 

484 THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
48s THE ABSD INSTRUCTION IS USED TO TEST MODE 2 

487 TEST 23 NEGF, ABSF AND TSTF SOURCE MODE 4 TEST 

rt) — “oe agar Ge pages 

£90 THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
491 THE ABSD INSTRUCTION IS USED TO TEST MODE 4 

493 TEST 26 NEGF. ABSF AND TSTF SOURCE MODE 3 TEST 


495 Sy 
496 . TH]S IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
497 THE“ ABSD INSTRUCTION IS USED TO TEST MODE 3 


rie TEST 25 NEGF, ABSF AND TSTF SOURCE MODE 5 TEST 


502 THIS IS A TEST THE NEGF, ABSF AND TSTF —_— FLOWS. 


ene THE NEGD INSTRUCTION IS USED TO TEST MODE 
505 TEST 26 NEGF, ABSF AND TSTF SOURCE MODE 6 TEST 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 6 


TEST 27 NEGF, ABSF AND TSTF SOURCE MODE 7 TEST 
THE ABSD INSTRUCTION IS USED TO TEST MODE 6 
NEGF, ABSF AND TSTF SOURCE MODE 6, GR7, TEST 


5 
5 
5 
5 
: THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
5 
5 
5 
5 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE NEGD INSTRUCTION IS USED TO TEST MODE 6 


NEGF, ABSF AND TSTF SOURCE MODE 7, GR7, TEST 






.. 7% 
CKFPCAQ FPTIF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 5-7 


SEQ 0011 


THIS IS A TEST THE NEGF, ABSF AND TSTF SOURCE FLOWS. 
THE ABSD INSTRUCTION IS USED TO TEST MODE 7 


SPECIAL DEST, MODE 0, TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 0 USING THE NEGD INSTR. 

SPECIAL DEST, MODE 1, TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 1 USING THE NEGD INSTR. 

SPECIAL DEST, MODE 2, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 2 USING THE NEGD INSTR. 


SPECIAL DEST, MODE 4, TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 4 USING THE NEGD INSTR. 

SPECIAL DEST, MODE 3, TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 3 USING THE NEGD INSTR. 

SPECIAL DEST, MODE 5, TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 5 USING THE NEGD INSTR. 

SPECIAL DEST, FLOATING MODE 2, TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 2 USING THE NEGF INSTR. 

SPECIAL DEST, MODE2, GR7 (IMMEDIATE), TEST 
THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 2< IMMEDIATE) USING THE NEGD INSTR. 

SPECIAL DEST, MODE 6, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION 
FLOWS MODE 6 USING THE NEGD INSTR, 





CKFPCAO FPIIF FLTG PNT PRT C 


MACRO M1111 


THIS IS A_TEST 


M 
24=SEP=79 15:03 PAGE 5-8 


OF THE NEGF ABSF AND TSTF DESTINATION 


FLOWS MODE 7 USING THE NEGD INSTR. 
NEGD, ABSD AND TSTD TEST 


THIS IS A_ TEST OF THE NEGD ABSD 


INSTRUCTIONS. 


THIS IS A TEST 
INSTRUCTION. 


THIS IS A TEST 
INSTRUCTION. 


THIS IS A TEST 
INSTRUCTION. 


_ THIS IS A TEST 


INSTRUCTION. 


THIS IS A TEST 
INSTRUCTION. 


THIS IS A TEST 
INSTRUCTION. 


THIS IS A TEST 
INSTRUCTION 


MODES, MODE 1 (FL=0), TEST 
OF SOURCE MODE 1 USING 
MODES, MODE 2 (FL=C), TEST 
OF SOURCE MODE 2 USING 
MODES, MODE 4 (FL=0), TEST 
OF SOURCE MODE 4 USING 
MODES, MODE 3 (FL=0), TEST 
OF SOURCE MODE 3 USING 
MODES, MODE 5 (FL=0), TEST 
OF SOURCE MODE 5 USING 
MODES, MODE 6 (FL=0), TEST 
OF SOURCE MODE 6 USING 
MODES, MODE 7 (FL=0), TEST 
OF SOURCE - MODE 7 USING THE 


MODES, MODE 2 GR7 (FL=1), TEST 


SEQ 0012 
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THIS IS A_TEST OF THE LDCLD WITH IMMEDIATE 


ADDRESSING MODE 
SOURCE MODES, MODE 2 (FL=1), TEST 


THIS IS A TEST OF THE LDCLD INSTRUCTION WITH MODE 2. 


LDCIF AND LDCLF TEST 


THIS IS A_ TEST OF THE LDCIF AND THE 
INSTRUCTIONS. 


LDCID AND LDCLD TEST 


THIS IS A TEST OF LDCID AND LDCLD 
LDEXP TEST 


THIS IS A TEST OF THE LDEXP INST A_ SUBROUTINE 


LDCLF 


IS 


USED TO SET UP_OPERANDS, EXECUTE THE LDEXP INST AND 


CHECK THE RESULTS. 

DESTINATION MODES, MODE 1 (FL=0), TEST 
THIS IS A TEST OF DESTINATION MODE 1 USING THE 
INSTRUCTION 

DESTINATION MODES, MODE 2 (FL=0), TEST 
THIS IS A TEST OF DESTINATION MODE 2 USING THE 
INSTRUCTION 

DESTINATION MODES, MODE 4 (FL=0), TEST 
THIS IS A TEST OF DESTINATION MODE 4 USING THE 
INSTRUCTION 

DESTINATION MODES, MODE 3 (FL=0), TEST 
THIS IS A TEST OF DESTINATION MODE 3 USING THE 
INSTRUCTION 

DESTINATION MODES. MODE 5 (FL=0), TEST 
THIS IS A TEST OF DESTINATION MODE 5 USING THE 
INSTRUCTION 

DESTINATIUN MODES, MODE 6 (FL=0), TEST 


SEQ 0013 
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SEQ 0014 


14 ee ee ee ee 22---------------------------- 


697 THIS IS A TEST OF DESTINATION MODE 6 USING THE STFPS 
698 INSTRUCTION 


700 TEST 67 DESTINATION MODES, MODE 7 (FL=0), TEST 
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THIS IS A TEST OF DESTINATION MODE 7 USING THE STFPS 
INSTRUCTION 


DESTINATION MODES, MODE 2 (Fi=1), TEST 


THIS IS A TEST OF DESTINATION MODE 2 USING STCOL 
ITH REGISTER 0 


DESTINATION MODES, MODE 4 (FL=1), TEST 


THIS IS A TEST OF DESTINATION MODE 4 USING STCDL 
WITH REGISTER 0 


STCDI AND STCDL TEST 


THIS IS A_TEST OF THE STCDI] AND STCDL INSTRUCTIONS. 
NOTE THAT A SUBROUTINE, STCSUB, IS USED TO SET UP 
ma a ha EXECUTE THE STC INSTRUCTION AND CHECK 
H SULT 


STCFL AND STCFI TEST 


THIS IS A TEST OF STCFL_ AND STCFI. IT MAKES USE _ OF 
THE SAME SUBROUTINE, STCSUB, WHICH WAS USED TO TEST 
STCDL AND STCDI. 


STEXP TEST 


THIS IS A TEST OF THE STEXP INSTRUCTION 
STST TEST 


THIS IS A TEST OF THE STST INSTRUCTION. FIRST AN 
ILLEGAL. FPS OP CODE (INSTRUCTION) IS USED TO ENTER 
AN ERROR CONDITION IN THE FEC AND FEA. THE STST IS 
EXECUTED AND THE FEC AND FEA ARE CHECKED 


D-SPACE NON-ACCESS TEST 


THIS IS A TEST THAT ENABLES D-SPACE, BUT MAKES IT 
NON-RESIDENT, CAUSING A MEMORY MANAGEMENT TRAP 
SHOULD IT BE ACCFSSED DURING AN INSTRUCTION THAT 
WILL NOT NORMALLY ACCESS D-SPACE. 


AUTO INCREMENT/DECREMENT TEST 


THIS IS A TEST THAT ENABLES D-SPACE, BUT Raw. 4. it 
NON-RESIDENT IN THE AREA OF THE TEST, FORCING & 
MEMORY MANAGEMENT TRAP FOR EVERY FPP INSTRUCTION IN 


SEQ 0615 
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& 


THE TEST. SR1 IS THEN EXAMINED "te AaOnT "ha nat 
ABORT, NOT ALLOWING PROPER EXAMINATION OF SR1. 


LISTING 


MNUMBER=44 3 
PROGNUM= 3 


AIST 
eNLIST MD,MC,CND 


SEQ 0016 


E 
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SEQ 0017 


.ENABL ABS 
"MCALL .HEADER,.SWRHI,.EQUAT,.SETUP,.S$CATCH,.$ACT11,.$(MTAG 
"MCALL .$EOP,.$SCOPE, .SERROR. .SSAVE..$TYPE, .$TYPOCT 

"MCALL C. «STRAP, . . $POWER, . SAPTHDR, . SAPTBLS 


»MCALL 

-MCALL .EQUIV ;REMOVE FOR PDP-10 
-TITLE CKFPCAO FP11F FLTG PNT PRT C 
:*COPYRIGHT (C) 1979 
;*DIGITAL EQUIPMENT CORP. 
s SAYNARD MASS. 01754 


S*THIS PROGRAM WAS ASSEMBLED USING THE PDP=11 MAINDEC SYSMAC 
¢ SPALKAGE (MAINDEC=11=DZQAC=C3), JAN 19, 1977. 


$1N 
$SwR=160000 ;ZHALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 


FPVECT=244 
MMVECT=250 
$SWR=177400 
$SSWRMSK=200 
TAB=11 
CRLF=15 


-SBTTL BASIC DEFINITIONS 
;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *** 
STACK= 1100 

ERROR=EMT 


SCOPE=I0T 
jem SCELLANEOUS DEF INITIONS 
i1 ;:CODE FOR HORIZONTAL TAB 
CR= 3 CODE FOR CARRIAGE RETURN 
CRLF= 200 ;CODE FOR CARRIAGE RETURN-LINE FEED 
PS= ::PROCESSOR STATUS WORD 


p 
STKLMT= z:STACK LIMIT REGISTER 

PIRQ= 3 PROGRAM INTERRUPT REQUEST REGISTER 
DSWR 7570 : s HARDWARE SWITCH REGISTER 

DDISP= 177570 HARDWARE DISPLAY REGISTER 

; *GENERAL PURPUSE REGISTER DEF INiTIONS 

RO= 20 NERAL REGIS 


40 
100 
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BASIC DEFINITIONS SEQ 0018 
000140 PR3= 140 s PRIORITY LEVEL 3 
2 PR4= 200 ; PRIORITY LEVEL 4 
000240 PRS= 240 ; PRIORITY LEVEL 5 
0003 PR6= 300 ;zPRIORITY LEVEL 6 
000340 PR7= 340 ; PRIORITY LEVEL 7 
s*'"SWITCH REGISTER'' SWITCH DEFINITIONS 
Sw15= 100000 
040009 Swi4= 40000 
02 SWw13= 20000 
010000 Swi2= 10000 
004000 Swi1l= 4000 
002000 Swi0= 2000 
001000 SwOo9= 1000 
000400 Swo8= 400 
000200 SwO7= 200 
000100 SwO6= 100 
0 SwOS= 40 
000020 Sw04= 20 
000010 SwO3= 10 
SwO2= 4 
000002 Swol= 2 
000001 swoo= 1 
001000 Sw9=Sw09 
00 SW8=Sw08 
000200 SwW7=SwW07 
000100 SW6=SWO06 
Sw5=Sw05 
000020 SW4=SW04 
000010 SW3=Sw03 
SW2=SW02 
000002 SwW1=Sw01 
000001 Sw0=Sw00 
:*DATA BIT DEFINITIONS (BITOO TO BiT15) 
100000 BIT15= 100000 
040000 BIT14= 40000 
020000 BIT13= 20000 
010000 BIT12= 10000 
000 BIT11= 0 
002000 BIT1C= 0 
001000 BITO9= 1000 
00 BITO8= 400 
000200 BITO7= 
006100 BITO6= 100 
000040 BITOS= 40 
000020 BITO4= 20 
000010 BITO3= 10 
000004 BITO2= 4 
000002 8ITO1= 2 
000001 BITOO= 1 
001000 BIT9=BITO9 
BI T8=B1T08 
000200 B1T7=B1T07 
000100 BI T6=B1T06 
000040 BIT5=BITOS 
000020 BI T4=B1T04 
600010 61T3=BIT03 
000004 BIT2=BIT02 


CKFPCAO FPI11F FLTG PNT PRT C 


BASIC DEFINITIONS 


NANAANNANNNS 
MONMIMOMGNMGMNMONMNPNY 
Ww 
Oo 


8 ad ct a el we ae a ed ae wn el cd el cl cl cl cl cl cl el el el a el ed ee) ald 
N 
NM 
Ww 
N 
&* 


G 2 
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; *BASIC 


EMTVEC= 
TRAPVE C= 


PIRQVEC= 


B1T1=B1T01 
B1T0=B1T00 
"*CPU'' TRAP VECTOR ADDRESSES 
4 :TIME OUT AND OTHER ERRORS 
At amegye | AND ILLEGAL INSTRUCTIONS 
14 ; TRACE T 
14 BREAKPOINT TRAP (BPT) 
= 20 <INPUT /OUTPUT TRAP (IOT) **SCOPE** 
24 Ona FAIL 
30 EMULATOR TRAP (EMT) **ERROR** 
34 ;""TRAP’' TRAP 
60 :iTTY KEYBOARD VECTOR 
64 3 TTY PRINTER VECTOR 
240 PROGRAM INTERRUPT REQUEST VECTOR 


-SBTTL FPP REGISTER DEFINITIONS 


ik ak a a a ot od = = = = = — Pe Pe Pe FE FL FL TE TL 
—OD 


NN NNN WNUWNNNNNNN NNNNNNNNNNNNNNNWNQU EWP 
N Nm Nm Nm 
w 
Ww 
oO 


HHHnHnnhnnnnnnnnnnonnnnn hth nat ne te th ih i ik th th the 


TRAP CATCHER 


SEQ 0019 


CKFPCAO FPTIF FLTG PNT PRT C 
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000174 
000176 


000200 


000000 


000174 
000000 
000006 


000137 006106 
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=0 
7 *ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A "' .o HALT"* 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
LOCATION, CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: .WORD 0 3 SOFTWARE DISPLAY REGISTER 
SWREG: «WORD 0 3s SOFTWARE SWITCH REGISTER 
.SBITL STARTING ADDRESS(ES) 
JMP @ASTART ;;JUMP TO STARTING ADDRESS OF PROGRAM 


SEQ 0020 





1084 


SSSBBasssssssssssss 


a 
— oe ss ss = Ss 2 os 2 Ss SS YS SS YS YS SS SS 


SEAENSRRVSAARNSKRAVES 


S 


001142 
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» SBTTL 


SCMTAG: 


$AUTOB: . 


$REG22: 


COMMON TAGS 
TTT TTT ti citi iii it iitiitiii iii tier iii iis) 
SSTHIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

;*USED IN + psec 


leleleleleleleleleleo® jleleleleleielalea) 


=] 
=) 
~ 
wn 
v 


nN 


ran) 
= 
GW 


ODOC OCOOCOCOCOVOOCSCSOOCOCORF CO—-NMO 


Si START OF 
: ; ¢ CONTAINS 





COMMON TAGS 


THE TEST NUMBER 

ERROR FLAG 

SUBTEST ITERATION COUNT 
SCOPE LOOP ADDRESS 
SCOPE RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 

MAX. ERRORS PER TEST 
PC OF LAST ERROR INSTRUCTION 
ADDRESS OF ‘GOOD' DATA 
ADDRESS OF "BAD" DATA 
"GOOD * DATA 


; 3 CON * DATA 
: RESERVED=-NOT TO BE USED 


; AUTOMATIC MODE INDICATOR 
3; INTERRUPT MODE INDICATOR 


;zADDRESS OF SWITCH REGISTER 
TY ae OF DISPLAY REGISTER 
TY KBD STATUS 
rT KBD BUFFER 
SITY PRINTER STATUS REG. ADDRESS 
[TTY PRINTER BUFFER REG. ADDRESS 
#3 CONTAINS NULL CHARACTER FOR FILLS 
:CONTAINS # OF FILLER CHARACTERS REQUIRED 
SINSERT FILL CHARS. AFTER A ‘LINE FEED'' 
; £3" TERMINAL AVAILABLE*’ = (BIT<07>=0=YES) 
CONTAINS THE ADDRESS FROM 
WHICH (SREGO) WAS OBTAINED 


; CONTAINS (($REGAD) +0) 
7: CONTAINS (($REGAD) +2) 
7 CONTAINS ((S$REGAD) +4) 


CONTAINS (($REGAD) +6) 
3=CONTAINS (($REGAD) +10) 
7:CONTAINS (($REGAD)+12) 
CONTAINS (($REGAD) +14) 
7: CONTAINS ((S$REGAD) +16) 
i:CONTAINS ((S$REGAD) +20) 
Z:CONTAINS (($REGAD) +22) 
7zCONTAINS (($REGAD) +24) 
7:CONTAINS ((S$REGAD) +26) 
i:CONTAINS (($REGAD) +30) 
Z2CONTAINS (($REGAD) +32) 
7: CONTAINS (($REGAD) +34) 
7: CONTAINS (($REGAD) +36) 
72 CONTAINS (($REGAD) +40) 
7: CONTAINS (($REGAD) +42) 
7 CONTAINS (($REGAD) +44) 


SEQ or | 


C 


000000 
000024 
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$REG23: 
.REPT 


SCAPE 
377 $BELL: 


S$QUES: 
SCRLF: 
SLF: 


. WORD 


:0 
-ASCIZ 


-ASCII 
-ASCII 
-ASCIZ 


J @ 
24=SEP=79 15:03 PAGE 10-1 


COOVWOCCOVVCVOCOOCOCOVOOQ000O oO 


<207><377><377> 


/?/ 
<15> 
<12> 


CONTAINS (($REGAD) +46) 
; USER DEF INED 


; USER DEFINED 
; USER DEFINED 
;sUSER DEFINED 


; MAX. NUMBER OF ITERATIONS 
sESCAPE ON ERROR ADDRESS 
SE CODE FOR BELL 


3 QUESTION MARK 
3: CARRIAGE RETURN 
;sLINE FEED 


'MARAAALALRAALASALASZSLALERAARASAASASARASLSASALARRARRA RAR RAR RR AR RSS S SSS SD | 


-SBTTL APT MAILBOX-E TABLE 


JAAR AAR AREER ARERR ARREARS 


:7APT MAILBOX 
7 MESSAGE TYPE CODE 


2 3FATAL 


ERROR NUMBER 


7 ;ENVI-ONMENT MODE BIT 
: FUSER SWITCH REGISTER 


PUT 


R_ SWITCHES 
YPE, hg = 


bits sae CPU T 


YPE 
1/04=01,11/05= y 11720= 03.11/40=04,11/45=05 
11776 06: PDQ=07,0=10 


BIT 10=REAL TIME CLOCK * 


BIT 9= 
BIT 8 


MEM. TYPE BYTE =~ 


=MEMORY MANA 
: HIGH ADDRESS .M.S. 


FLOATING POINT eeCE SEN 
GEMENT 

BYTE 

(HIGH BYTE) 


TYPE ,BLKAi 


SEQ 0022 
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K 
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$MADR1: .WORD 
** 
S2: .BYTE 
$MTYP2: .BYTE 
Re: . D 
S3: .BYTE 
SMTYP3: .BYTE 
SMADR3: . 
SMAMS4: .BYTE 
SMTYP4: .BYTE 
SMADR4: .WORD 
S$VECT1: WORD 
$VECT2: .WORD 
SE: WORD 
SDEVM: .WORD 
$CDW1: .WORD 
$CDW2: .WORD 
$DDWO: .WORD 
$DDW1: .WORD 
$DDW2: .WORD 
$DDW3: .WORD 
SDDW4: .WORD 
$DDWS: .WORD 
$DDW6: .WORD 
$DDW7: .WORD 
S$DDW8: .WORD 
DW9: WORD 
SDDW10: .WORD 
$DDW11: .WORD 
$DDW12: .WORD 
$DDW13: .WORD 
$DDW14: .WORD 


900 NSEC CORE=001 


300 NSEC BIPOLAR=002 
MOS=003 


500 “re 


3 sHIGH ADDRESS, 
MEM 


Kf 
«LAST ADDR. ae fy hte ,THIS WORD AND LOW OF ‘‘TYPE’’ ABOVE 


;;HIGH ADDRESS,M 
IMEM. TYPE ,BLKA2 
3 =MEM.LAST “ty et BLK#2 


ae 


: ; sHIGH ADDRESS ,.M 
TY ka3 


-S.BYTE 


:MEM.LAST ADDRESS ,BLK#3 

3 SHIGH ADDRESS .M.S.BYTE 
. TYPE ,BLKAG 
7 7MEM.LAST ADDRESS ,BLK#4 


+ INTERRUPT VECTOR#1 ,BUS apt gy Leg 


INTERRUPT VECTOR#2BUS PRIOR 


IT 
; 7BASE Pia OF EQUIPMENT UNDER TEST 


3; ;DEVICE MAP 


3: CONTROLLER DESCRIPTION WORD#1 
: CONTROLLER DESCRIPTION WORDA2 
CE DESCRIPTOR #0 


: DEVICE 


DESCRIPTOR 
DESCRIPTOR 


DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 


DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 
DESCRIPTOR 


WORD#6 
WORD#7 
WORD#'8 


SEQ 0023 
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001442 
001442 
001450 


001452 
001460 


001462 
001470 


001472 
001500 


001502 
001510 


001512 
001520 


001522 
001530 


001532 
001540 


001542 
001550 


001552 
001560 
001562 
001570 
91572 
001600 
001602 
001610 
001612 
001620 


001622 
001630 


000443 
046614 
075354 
046653 
075363 
046706 
075363 
046741 
075363 
047001 
075373 
047023 
075405 


047127 
075363 


047170 
075373 


047213 
075363 


047254 
075411 


047277 
075405 


047277 
075405 


047333 
075411 


047354 
075363 


047403 
075405 


073547 


073622 


073712 


074002 


074071 


074071 


074002 


074071 


074002 


074071 


074132 


074132 


074071 


074172 


074132 


7 
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076012 


076032 


076054 


076076 


076120 


076146 


076076 


076120 


076076 


076120 


076146 


076146 


076120 


076160 


076146 


-SBTTL _ERROR POINTER TABLE 

;*THIS TABLE Sls THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

>*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

: sLOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE Ha + # ;" PERTINENT. 
; *NOTE1 IF SITEMB IS 0 THE ONLY PERTINENT DATA _IS (S$ERRPC 


: *NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS FAPLAINED AS FOLLOWS: 
:* eM :POINTS TO THE ERROR MESSAGE 
* DH : [POINTS TO THE DATA HEADER 
* DT ::POINTS TO THE DATA 
;* DF ::POINTS TO THE DATA FORMAT 
$ERRTB 

MNUMBER 
:1TEM 1 
EM1,DH1,DT1,DF1 

Z1TEM 2 

.WORD &M2,DH2,DT2,DF2 
ZITEM 3 

.WORD &M3,DH3,D13,DF3 
ZITEM 4 

.WORD £&M4,DH4,DT4,DF4 
y1TEM 5 

.WORD &M5,DH5,DTS,DF5 
Z1TEM 6 

.WORD £&M6,DH6,DT6,DF6 
z1TemM 7. 

SWORD £&M7,DH7,DT7,DF7 
Z1TEM 10 

.WORD £&M10,DH10,DT10,DF10 
Z1TEM 11 

.WORD  €M11,DH11,DT11,DF11 
ITEM 12 

.WORD £€M12,DH12,D1T12,DF12 
Z1TEM 13 

.WORD  €M13,DH13,D113,DF13 
ZITEM 14 

.WORD £&M14,DH14,DT14,DF 14 
sITEM 15 

.WORD  £€M15,DH15,DT15,DF15 
ZITEM 16 

.WORD £M16,DH16,DT16,DF 16 
sITEM 17 

.WORD €M17,DH17,D117,DF 17 


SEQ 0024 


M 2 
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ITEM 20 
001632 047441 074002 076160 . 
001640 075363 


WORD &M20,DH20,D720.DF 20 


s1TEM 21 
001642 047502 074071 076120 .WORD EM21,DH21,DT21,D*21 
001650 075411 —* 
001652 047502 074071 076120 ° .WORD E&M22,DH22,DT22 .DF22 
001660 075411 


s ITEM 23 
001662 047525 é 
001670 075405 


001672 047564 074002 076160 
001700 075363 


001702 047626 074071 076120 
001710 075411 


001712 047652 074132 076146 
001720 075405 


001722 047711 074002 076160 
001730 075363 


001732 047753 074071 076120 
001740 075411 


001742 047777 074132 076146 
001750 075405 


074132 076146 WORD €EM23,DH23,DT23,DF 23 


ITEM 24 
«WORD  EM24,DH24,DT24,DF 24 


7 ITEM 25 
«WORD E&M25,DH25,DT25,DF25 


ITEM 26 
-WORD EM26,DH26,D126,DF 26 


:1TEM 27 
«WORD EM27,DH27,DT27,DF 27 


7 1TEM 30 
-WORD &M30,DH30,DT30,DF 30 


31TEM 31 
«WORD £&M31,DH31,D131,DF 31 


s ITEM 32 
001752 050035 074002 076160 .WORD £M32,DH32,D132,DF 32 
001760 075363 Sone a 
001762 050076 074071 076120 ° .WORD £&M33,DH33,D133.DF 33 
001770 075411 ie ie 
001772 050121 074132 076146 ~ -WORD £M34,DH34,D734,DF 34 
002000 075405 aay 
002002 050160 074002 076160 ~ .WORD £M35,DH35,D135,DF 35 
002010 075363 rg 
002012 050222 074071 076120 ~ .WORD £M36,DH36,D136,DF 36 
sees ITEM 37 
002022 050246 074261 076202 ~ -WORD &M37,DH37,D137,DF 37 
002030 075423 ot ie 
002032 050272 074261 076202 ~ .WORD  £M40,DH40,DT40,DF40 
002040 075423 sa 
002042 050320 074351 076246 ° .WORD £M41,DH41,D141,DF41 
002050 075444 i 
346 074261 076202 ° .WORD  £M42,DH42,DT42,DF 42 


002052 050 
002060 075423 


CKFPCAO FP11F FLTG PNT 
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002062 
002070 


002072 © 
002100 


002102 
002110 


002112 
002120 


002122 
002130 


002132 
002140 


002142 
002150 


002152 
002160 
002162 
002170 
002172 
002200 
002202 
002210 
002212 
002220 
002222 
002230 


002232 
002240 


002242 
002250 


002252 
002260 
002262 
002270 


002272 
002300 


002302 
002310 


050425 
075423 


050531 
075423 


050631 
075423 


050707 
075423 


051013 
075423 


051113 
075423 


051227 
075423 


051253 
075423 


051277 
075423 


051323 
075423 


051402 
075423 


051530 
075423 


051632 
075423 


051742 
075423 


052052 
075423 


052154 
075363 


052260 
075363 
052306 
075373 


075368 


PRT C 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074351 


074261 


074261 


074261 


074261 


074261 


074261 


073622 


073712 


074077 


073622 


MACRO M1111 


076202 
076202 
076202 
076202 
076202 
076202 
076202 
076202 
076246 
076202 
076202 
076202 
076202 
076202 
076202 
076160 
076160 
076120 


076160 


7 ITEM 43 
ZITEM 44 
ITEM 45 
; ITEM 46 
ITEM 47 
7 1TEM 50 
ITEM 51 
7 1TEM 52 
7 1TEM 53 
ITEM 54 
ITEM 55 
ITEM 56 
ITEM 57 
7: 1TEM 60 
7 ITEM 61 
7 1TEM an 
71TEM = 
ITEM 64 


ITEM 65 


N 
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EM43,DH43,D143,DF43 
EM44 ,DH44 ,DT44 DF 44 
EM45 ,DH45,DT45,DF45 
EM46 ,DH46,DT46,DF 46 
EM47,DH47,D147,DF47 
EMSO,DH50,DT50,DF 50 
EMS1,DH51,DT51,DF 51 
EMS2,DH52,DT52,DF 52 
EMS3,DH53,DT53,DF 53 
EMS4 ,DH54 .DT54 DF 54 
EMSS .DHS5,DTS5,DF55 
EMS6,DH56,DT56, DF 56 
EMS7,DH57,DT57,DF57 
EM60,DH60,.DT60, DF 60 
EM61,DH61,DT61,DF61 
EM62 ,DH62,DT62,DF 62 
EM63,DH63,D163,DF 63 
EMO4 ,DH64 ,DT64 ,DF 64 


EM65 ,DHOS ,DT65 ,DF65 


SEQ 0026 


8 
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ERROR POINTER TABLE SEQ 0027 


ITEM 66 ; 
. WOR EM66 ,DH66 ,DT66,DF 66 


002312 052405 074002 076076 
002320 075363 


s ITEM 
002322 052444 073622 076076 . EM67,DH67,D167,DF 67 
002330 075363 — 


002332 052545 073712 076076 ’ EM70,DH70,DT70,DF 70 
002340 075363 ion 

002342 052636 074071 076312 ~ : EM71,DH71,DT71,DF 71 
002350 075465 ae 


002352 052655 073622 076976 . EM72,DH72,D172,DF72 
002360 075363 — 


002362 052736 074971 076346 . EM73,DH73,D173,DF 73 
002370 075465 ren 


002372 052757 074002 076076 ° EM74,DH74,DT74,DF 74 
002400 075363 — 


002492 053001 073622 076032 . EM75,DH75,DT75,DF75 - 
002410 075363 Te 


002412 055024 074132 076146 ° EM76,DH76,DT76,DF 76 
002420 075405 _— 


002422 053065 074071 076346 ° EM77 ,DH77,DT77,DF77 
002430 075465 — 


002432 053107 074002 076076 . EM100,DH100,DT100,DF 100 
002440 075363 eR 


002442 053132 073622 076032 . EM101,DH101,DT101,DF 101 
002450 075363 —_ 


002452 053156 074132 076146 : EM102,DH102,DT102,DF 102 
002460 075405 ven 


002462 053217 074071 076346 . EM103,DH103,DT103,DF 103 
002470 075465 —— 


002472 053241 074002 076076 EM104 ,DH104 ,DT104 DF 104 
002500 075363 — 


002502 053264 073622 076032 ° EM105,DH105,D1105,DF 105 
002510 075363 ' Tere 


002512 053310 074132 076146 . EM106,DH106,DT106,DF 106 
002520 075405 _ 


002522 052676 074132 076146 ; EM107,DH107,DT107, DF 107 
002530 075405 oe 


002532 053352 074071 076346 . EM110,DH110,DT110,DF 110 
002540 075465 
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002542 
002550 


002552 
002560 
002562 
002570 
002572 
002600 
002602 
002610 
002612 
002620 


002622 
002630 


002632 
002640 
002642 
002650 
002652 
002660 


002662 
002670 


002672 
002700 
002702 
002710 
002712 
002720 


002722 
002730 


002732 
002740 


002742 
002750 


002752 
002760 


002762 
002770 


053375 
675363 


053421 
075363 


053446 
075405 


053510 
075465 


053533 
075363 


053557 
075363 


053604 
075405 


053645 
075465 


053667 
075363 


C53712 
075363 


053736 
075405 


054000 
075465 


054023 
075363 


054047 
075363 


054074 
075405 


054136 
075465 


054161 
075363 
054206 
075405 
054251 
075465 


PRT C 


074002 


073622 


074132 


074071 


074002 


073622 


074132 


074071 


074002 


073622 


074132 


074071 


073622 


074132 


074071 


073622 


074132 


074971 


MACRO M1111 
s ITEM 
076076 


;1TEM 
076032 


; ITEM 
076146 


s ITEM 
076346 


s1TEM 
076076 


s1TEM 
076032 


; ITEM 
076146 


ZITEM 
076346. 


; ITEM 
076076 


s ITEM 
076032 


s ITEM 
076146 


Z ITEM 
076346 


7 ITEM 
076076 


Zs ITEM 
076032 


; ITEM 
076146 


: ITEM 
076346 


;1TEM 
076032 


SITEM 
076146 


Zs ITEM 
076346 


111 
. WORD 


C 
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EM111,DH111,D1111,DF 111 
EM112,DH112,DT112,DF 112 
EM113,DH113,01113,DF 113 
EM114,DH114,D1T114,DF114 
EM115,DH115,D1115,DF115 
—EM116,DH116,DT116,DF 116 
o 
EM117,DH117,DT117,DF 117 
EM120,DH120,DT120,DF 120 
EM121,DH121,DT121,DF121 
EM122,DH122,DT122,DF 122 
EM123,DH123,D1123,DF 123 
EM124 ,DH124,D1124,DF 124 
EM125,DH125,DT125,DF 125 
EM126,DH126,DT126,DF 126 
EM127,DH127,DT127,DF 127 
EM130,DH130,D1130,DF 130 
£M131,DH131,07131 DF 131 
EM132,DH132,D1132,DF 132 


EM133,DH133,017333,DF 133 


D 
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ZITEM 134 
002772 054275 073622 076032 ~WORD EM134,DH134,0T134,9F 134 
003000 075363 _— 


003002 054323 074071 076120 . EM135,DH135,D7135,DF 135 
003010 075411 ren 


003012 054376 074071 076120 ; EM136,DH136,D1136.DF 136 
003020 075411 _ 


003022 054415 073622 076160 . EM137,DH137,D1137,DF 137 
003030 075363 en 


003032 054436 074071 076120 . EM140 ,DH140,DT140,DF 140 
003040 075411 _— 


003042 054457 074002 076076 . EM141,DH141,D1141,DF 141 
003050 075363 _— 


003052 054526 073622 076076 . EM142,DH142,D1T142,DF 142 
003060 075363 ‘Ten 


003062 054551 074071 076120 . EM143,DH143,D1143,DF 143 
003070 075411 a 
il 


003072 054573 074002 076076 . EM144 ,DH144,DT144,DF 144 
003100 075363 _— 


003102 054643 073622 076076 . EM145,DH145,D1145,DF 145 


003110 075363 
7 ITEM 


003112 054667 074071 076120 . EM146,DH146,Di 146,DF 146 
003120 075411 _— 


003122 054711 074002 076076 ° EM147,DH147,D1T147,DF 147 
003130 075363 _— 


003132 054761 073622 076076 . £M150,DH150,DT150,DF 150 
003140 075363 _— 


003142 055005 074071 076120 ° EM151,DH151,D7151,DF 151 
003150 075411 — 


003152 055030 074002 076076 ° EM152,DH152,DT152,DF152 
003160 075363 —_ 


003162 055101 073622 076076 ° EM153,DH153,D1153,DF 153 
003170 075363 —_ 


003172 055126 074071 076120 . EM154,DH154,D1T154,DF 154 
003200 075411 enn 


003202 074002 076076 ° EM155,DH155,D1155 DF 155 
003210 _ 


003212 073622 076076 ° EM156,DH156,D1156,DF 156 
003220 





CKFPCAO FP1IF FLTG PNT 

ERROR POINTER TABLE 
003222 055247 
003230 075411 


055271 
075363 


055363 
075363 


055407 
075411 


055432 
075363 


055457 
075363 


056255 
075423 


056276 
075423 


056317 
075423 


056340 
075423 


056363 
075423 


003232 
003240 


003242 
003250 


003252 
003260 
003262 
003270 
003272 
003300 
003302 
003310 


003312 
003320 


003322 
003330 


003332 
003340 


003342 
003350 
003352 056406 
003360 075423 
003362 056431 
003370 075444 


003372 056454 
003400 075444 
056477 
075444 
052570 
075303 


052613 
075363 


056522 
075423 


056577 
075423 


003402 
003410 


003412 
003420 
003422 
003430 


003432 
003440 


003442 
003450 


PRT C 


074071 


074002 


073622 


074071 


073622 


074172 


074261 


074261 


074261 


074261 


074261 


074261 


074351 


074351 


074351 


073622 


073712 


074261 


074261 


MACRO M1111 


076120 


076076 


076076 


076120 


076076 


076076 


076202 


076202 


076202 


076202 


076202 


076202 


076246 


076246 


076246 


076076 


076076 


076202 


076202 


s ITEM 157 


. WORD 


s ITEM 


s ITEM 


; ITEM 


ITEM 


: ITEM 


7 ITEM 


: ITEM 


: ITEM 


7; iTEM 


Z ITEM 


ZITEM 


Z ITEM 


Z ITEM 


:1TEM 


> ITEM 


:1TEM 


7: 1TEM 200 
. WORD 


: ITEM 201 
. WORD 





E 
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EM157,DH157,DT157,DF 157 
EM160,DH160,DT160,DF 160 
EM161,DH161,D1161,DF 161 
EM162,DH162,D1162,DF 162 
EM163,DH163,D1163,DF 163 
EM164 ,DH164,DT 164 ,DF 164 
EM165 ,DH165,D1T165,DF 165 
EM166,DH166,DT166,DF 166 
EM167,DH167,D1167,DF 167 
EM170,DH170,DT170,DF 170 
EM171,DH171,DT171,DF 171 
EM172,DH172,DT172,DF 172 
EM173,DH173,D1T173,DF 173 
EM174,DH174,D1174,DF 174 
EM175,DH175,D1175,DF175 
EM176,DH176,D1176,DF 176 
EM177,DH177,D1177,DF177 
EM200 ,DH200 ,DT 200, DF 200 


EM201 ,DH201,DT201 DF 201 


CKFPCAO FPIIF FLTG PNT 
ERROR POINTER TABLE 


003452 056700 
003460 075423 


003462 057001 
003470 075423 


003472 057161 
003500 075423 


003502 057236 
003510 075423 


003512 057335 
003520 075423 


003522 057436 
003530 075423 


003532 057535 
003540 075423 


003542 057634 
003550 075423 


003552 057742 
003560 075423 
003562 060043 
003570 075423 
003572 060170 
003600 075423 
003602 055533 
003610 075363 


003612 055664 
003620 075411 
003622 055706 
003630 075363 
003632 055756 
003640 075363 
003642 056002 
003650 075363 
003652 056134 
003660 075411 
003662 056157 
003670 075363 
003672 056230 
003700 075363 


PRT C 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


07426" 


074261 


074261 


074172 


074071 


C74002 


073622 


074172 


074071 


074002 


073622 


MACRO M1111 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076076 


076120 


076076 


076076 


076076 


076120 


076076 


076076 


sITEM 202 

. WORD 
s ITEM 203 

. WORD 
s ITEM 204 

WORD 
s ITEM 205 

. WORD 
sITEM 206 
s ITEM 207 

. WORD 
: ITEM 210 

. WORD 
Z ITEM 211 

. WORD 
ZITEM 212 

.» WORD 
s ITEM 213 

. WORD 
SITEM 214 

. WORD 
ZITEM 215 

.- WORD 
SITEM 216 

. WORD 
Z ITEM 217 

. WORD 
: ITEM 220 

. WORD 
Z ITEM 221 

WORD 
Z ITEM 222 

WORD 
7 ITEM 223 


ZITEM 224 
. WORD 


F 
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EM202 ,DH202 ,DT202,DF 202 
EM203,DH203,DT203,DF 203 
EM204 ,DH204 ,DT204 ,DF 204 
EM205 ,DH205 ,DT205 ,DF 205 
EM206 ,.DH206,DT206,DF 206 
EM207 ,DH207 ,DT207.,DF 207 
EM210,DH210,DT210,DF 210 
EM211,DH211,DT211,DF 211 
EM212,DH212,DT212,DF 212 
EM213,DH213,D1213,DF 213 
EM214,DH214,DT214,DF 214 
EM215,DH215,DT215,DF 215 
EM216,DH216,DT216,DF 216 
EM217,DH217,DT217,DF 217 
EM220 ,.DH220,DT220,DF 220 
EM221 ,DH221 ,DT221 DF 221 
EM222 ,DH222 DT 222, DF 222 
EM223,DH223,D1223,DF 223 


EM224 ,DH224 ,DT2246 DF 224 


SEQ 0031 





CKFPCAO FRPIIF FLTG PNT 
ERROR POINTER TABLE 


003702 
003710 


003712 
003720 


003722 
003730 


003732 
003740 


003742 
003750 


003752 
003760 


003762 
003770 


003772 
004000 


004002 
004010 


060315 
075502 


060340 
075502 
060364 
075512 
060414 
075502 
060440 
075502 
060465 
075512 
060516 
075502 
060542 
075502 
060567 
075512 
060620 
075502 
060645 
075502 
060673 
075512 
060725 
075502 
060752 
075502 


061000 
075512 


PRT C 


074002 
073622 
074446 
074002 
073622 
074446 
074002 
073622 
074446 
074002 
073622 
074446 
074002 
073622 
074446 
074002 
073622 
074172 


074446 


MACRO M1111 


076076 


076076 


076146 


076076 


076076 


076146 


076076 


076076 


076146 


076076 


076076 


076146 


076076 


076076 


076146 


076076 


076076 


076076 


076146 


sITEM 225 

. WORD 
s ITEM 226 

WORD 
s ITEM 227 

. WORD 
: ITEM 230 

. WORD 
7 ITEM 231 

. WORD 
: ITEM 232 

. WORD 
s ITEM 233 

WORD 
ZITEM 234 

~ WORD 
7 ITEM 235 

. WORD 
ZITEM 236 

.» WORD 
: ITEM 237 

. WORD 
Z ITEM 240 

. WORD 
SITEM 241 

. WORD 
ZITEM 242 

. WORD 
SITEM 263 

. WORD 
Z ITEM 244 

. WORD 
ZITEM 245 

. WORD 
Z1TEM 246 

.~ WORD 


ITEM 267 
. WORD 


G 
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EM225 ,DH225,DT225,DF 225 
EM226,DH226,DT226,DF 226 
EM227 ,DH227 ,DT227,DF 227 
EM230 ,DH230,D1230,DF 230 
EM231,DH231,D1231,DF231 
EM232,DH232,D1232,DF 232 
EM235,DH233,D1233,DF 233 
EM234 ,DH234 ,DT234 DF 234 
EM235 ,DH235,DT235 ,DF 235 
EM236,DH236,D1236,DF 236 
EM237 ,DH237,DT237,DF 237 
EM240,DH240,DT240,DF 240 
EM241,DH241,DT241,DF 241 
EM242 ,DH242,.DT242,DF 242 
EM243,DH243,DT243,DF 243 
EM244 .DH244 ,DT244,,DF244 
EM245 ,DH245 ,D1245 ,DF 245 
EM246 ,DH246,.D1246, DF 246 


EM247 ,DH247 ,DT247 DF 247 


—— 


CKFPCAO FPI1F FLTG PNT PRT C 
ERROR POINTER TABLE 


004132 
004140 


004142 
004150 


004152 
004160 


004162 
004170 


004172 
004200 
004202 
004210 


904212 
0064220 


004222 
004230 
004232 
004240 


004242 
004250 


004252 
004260 


004262 
004270 


004272 
004 $00 


004 302 
004310 


004312 
004320 


004 322 
004 330 


004 332 
004 340 


004 342 
004 *50 


004352 
004 360 








061165 
075502 


061565 
075516 
061665 
075516 


061713 
075516 


062010 
075516 


062101 
075516 


062214 
075516 
062311 
075516 
062352 
075516 


062420 
075516 


074002 
073622 
074172 
074446 
074172 
074446 
074002 
073622 
074261 
074261 
074261 
074261 
meant 
074261 
074261 
074261 
074261 
074261 


074261 


H 
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076076 


076076 


076076 


076146 


076076 


076146 


076076 


076076 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


076202 


: ITEM 250 

. WORD 
sITEM 251 

. WORD 
s ITEM 252 

. WORD 
s ITEM 253 

. WORD 
sITEM 254 

. WORD 


sITEM 255 
.~ WORD 


ITEM 256 


Z1TEM 257 
. WORD 


7 1TEM 260 
. WORD 


Zs ITEM 261 


: ITEM 262 
. WORD 

SITEM 263 
.~ WORD 

ZITEM 264 
. WORD 


ITEM 265 
. WORD 


7 1TEM 266 


7 1TEM 267 


: 1 TEM 270 
. WORD 


ZITEM 271 


ITEM 272 


EM250,DH250 ,DT250, DF 250 
EM251,DH251,DT251,DF 251 
EM252,DH252,DT252,DF 252 
EM253,DH253,D1253,DF 253 
EM254 ,DH254,D1254 ,DF 254 
EM255 ,DH255 ,DT255,DF 255 
EM256,DH256,D1256,DF 256 
EM257,DH257,D1257,DF 257 
EM260 ,DH260 ,DT 260, DF 260 
EM267 ,DH261 ,DT261 ,DF 261 
EM262 ,DH262 ,DT 262 , DF 262 
EM263,DH263,D1263,DF 263 
EM264 ,DH264 ,DT 264 , DF 264 
EM265 ,DH265 ,DT265 ,DF 265 
EM266 , DH266 ,DT 266 , DF 266 
EM267 ,DH267 ,DT 267, DF 267 
EM270,DH270,D1270,DF 270 
EM271,DH271,D1271,DF 271 


EM272,DH272 ,.DT272,DF 272 


SEQ 0033 


CKFPCAO FP11F FLTG PNT 
ERROR POINTER TABLE 


004362 06 
004370 07 
004372 06 
004400 075 
004402 062605 
004410 075537 
004412 062705 
004420 075537 


004422 06300? 
004430 075537 


004432 063056 
004440 075537 


004442 063153 
004450 075560 


004452 063177 
004460 075560 


004462 063225 
004470 075604 


004472 063253 
004500 075560 


004502 063342 
004510 075560 
004512 063445 
004520 075560 
004522 063632 
04530 075560 


004532 063734 
004540 075560 


004542 064037 
004550 075560 


004552 064140 
004560 075560 


004562 064242 
004570 075560 


004572 064343 
004600 075560 
004602 


064444 
004610 075560 


PRT C 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074351 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


MACRO M1113 


076202 
076202 
0762v2 
076202 
076202 
076202 
076402 
076402 
076454 
076402 
076402 
076402 
076402 
076402 
076402 
076402 
076402 
076402 


076492 


ZITEM 273 
. WORD 
sITEM 274 
.~ WORD 
s ITEM 275 
WORD 
s1TEM 276 
.~ WORD 
s1TEM 277 
: 1 TEM 300 
s ITEM 301 
7 1TEM 302 
:1TEM 303 
ZITEM 304 
; ITEM 305 
s ITEM 306 
Z ITEM 307 
: ITEM 310 
Z ITEM 311 
ZITEM 312 
ZI1TEM 313 
7ITEM 314 


71TEM 315 
WORD 
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EM273,DH273,D1273,DF 273 
EMZ74 ,DH274 ,DT274 DF 274 
EM275 ,.DH275 ,DT27* ,DF275 
EM276,DH276,D1276,DF 276 
EM277 ,DH277,L1277,DF 277 
EM300 ,DH300,DT 300, DF 300 
EM301,DH301,D1301,DF 301 
EM302 ,DH302 ,DT 302, DF 302 
EM303,DH303,D1 303, DF 303 
EM304 ,DH304 ,DT 304 , DF 304 
EM305 ,DH305 ,DT305,DF 305 
EM506,DH306 ,DT 306, DF 306 
EM307 ,DH307 ,DT307,DF 307 
EM310,DH310,D1310,DF 310 
EM311,DH311,D7311,DF 311 
EM312,DH312,DT312,DF 312 
£M313,DH313,D1313,DF 313 
EM314,DH314,D1314,DF 314 


EM315,DH315,D1315,DF 315 


SEQ 0034 


J 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 11-11 
ERROR POINTER TABLE SEQ 0035 


s ITEM 316 
004612 064545 074261 076402 . WORD 
004620 075560 


EM316,DH316,D1316,DF 316 
Z1TEM 317 


004622 064646 074261 076402 .WORD £€M317,DH317,D1317,DF 317 
004630 075560 aie te 

004632 064747 074261 076402 ~ .WORD EM320,DH320,DT320, DF 320 
004640 075560 om Soi 

004642 065050 074261 076402 ° .WORD  EM321,DH321,DT321,DF 321 
004650 075560 ‘iat Sie 

004652 065151 074261 076526 ~ -WORD £€M322,DH322,D1322,DF 322 
004660 075630 eae Oath 

004662 065206 074261 076526 ~ .WORD £M323,DH323,D1323, DF 323 
004670 075630 ap 

004672 065245 074351 076572 ~ .WORD EM324,DH324,D1324,DF 324 
004700 075651 a Gan 

004702 065304 074261 076526 ° -WORD &M325,DH325,D1325,DF 325 
004710 075630 ‘ao te 

004712 065304 074261 076526 ~ .WORD £M326,DH326,D1326,DF 326 
004720 075630 sensi te 

004722 065445 074261 076526 ~ .WORD EM327,DH327,D1327,DF 327 
004730 075630 aly 

004732 065547 074261 076526 ° .WORD £M330,DH330,D1T330,DF 330 
004740 075630 com 

004742 065652 074261 076526 ~ .WORD £€M331,DH331,D1331,DF 331 
004750 075630 shape 

004752 067126 074261 076526 ~ -WORD £&M332,DH332,D1332,DF 332 
004760 075630 one 

004762 065206 074261 076526 ~ .WORD £M333,DH333,D1333,DF 333 
004770 075630 saan ti 

004772 065755 074261 076526 ~ .WORD £M334,DH334,D1334,DF 334 
005000 075630 oo hae 

005002 066051 074261 076526 ° .WORD £&M335,DH335,D1335,DF 335 
005010 075630 cos ; 
005012 066153 074261 076526 ~ .WORD £M336,DH336,D1336, DF 336 
005020 075630 om walp 7 

005022 066227 074261 076526 * .WORD £M337,DH337,D1337,DF 337 
005030 075630 iene 

* 005032 066331 074261 076526 ~ .WORD £M340,DH340,D7340, DF 340 


005040 075630 


CKFPCAO FP11F FLTG PNT 
ERROR POINTER TABLE 


005042 066433 
005050 075630 
005052 066537 
005060 075630 
005062 066641 
005070 075630 


005072 066743 
005100 075630 


005102 067220 
005110 075630 


005112 067320 
005120 075630 


005122 067416 
005130 075672 


005132 067442 
005140 075672 


005142 067470 
005150 075512 


005152 067574 
005160 075672 


005162 067700 
005170 075672 


005172 070004 
005200 075672 


070110 
075672 


070214 
075502 


005222 070312 
005230 075502 


005202 
005210 
005212 
005220 


070410 
075512 
072640 
075502 


005232 
005240 
005242 
005250 


005252 
005260 


072663 
075713 


072773 


005262 
005270 075721 


PRT C 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074261 


074132 


074261 


074261 


074261 


074261 


074002 


074506 


074132 


073622 


074576 


074641 


K 
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076526 


076526 


076526 


076526 


076526 


076526 


076526 


076526 


076146 


076526 


076526 


076526 


076526 


076032 


076054 


076146 


076402 


076636 


076654 


ITEM 341 
- WORD 


s ITEM 


s ITEM 


; ITEM 


S ITEM 


; ITEM 


; ITEM 


ZI1TEM 


s ITEM 


s ITEM 


ZITEM 


7 ITEM 


SITEM 


7 ITEM 


Z ITEM 


7 1TEM 


sITEM 


7 1TEM 


; ITEM 


EM341 ,DH341,D1341 ,DF 341 
EM342 ,DH342,D1342,DF 342 
EM343 ,DH343,D1343,DF 343 
EM344 ,DH344 ,D1 344, DF 344 
EM345 ,DH345,D1345 ,DF 345 
EM346 ,DH346,D1346, DF 346 
EM347,DH347,D7 347, DF 347 
EM350,DH350,D1350,DF 350 
EM351,DH351,D1351,DF 351 
EM352,DH352,DT352,DF 352 
EM353,DH353,D1353 DF 353 
EM354 ,DH354 ,D1 354, DF 354 
EM355 ,DH355 ,DT355 DF 355 
EM356,DH356,D1 356, DF 356 
EM357 ,DH357,D1357 DF 357 
EM360 ,DH360 ,DT 360. DF 360 
EM361,DH361,D1361 , DF 361 
EM362 .DH362 ,DT 362 ,DF 362 


EM363,DH363,D1 363, DF 363 





L 
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ERROR POINTER TABLE SEQ 0037 
: ITEM 364 

005272 073041 074716 076674 .WORD  EM364,DH364,D1364,DF 364 
005300 075405 a 
005302 073141 075003 076146 ~ .WORD £M365,DH365,D1365, DF 365 
005310 075405 Sia te 
005312 073224 075041 076706 ~ “WORD £&M366,DH366,D1 366, DF 366 
005320 075730 saat talk 
005322 073307 075114 076754 ~ .WORD £M367,DH367,D1367,DF 367 
005330 075752 ann ne 
005332 073372 075202 076776 ~ .WORD £€M370,DH370,DT370,DF 370 
005340 075762 sie, tn 
005342 000000 000000 000000 ~ .WORD £&M371,DH371,D1371,DF 371 
on ITEM 372 
005352 000000 000000 000000 ~ <WORD &M372,DH372,D1372,DF 372 
_— ITEM 373 
005362 000000 000000 000000 ~ ,WORD £M373,DH373,D1373,DF 373 
nee ITEM 374 
005372 000000 000000 000000 ° ,WORD £&M374,DH374,D1374,DF 374 
obter: ITEM 375 
005402 000000 000000 000000 ~ “WORD €M375,DH375,D1375,,DF 375 
goers ITEM 376 
005412 000000 000000 000000 ° “WORD £M376,DH376,D1376.DF 376 
es ITEM 377 
005422 000000 000000 000000 ~ «WORD £M377,DH377,D1377,DF 377 
_— ITEM 400 
005432 000000 000000 000000 ~ .WORD £M400,DH400,DT400,DF 400 
ae ITEM 401 
005442 070503 074002 076076 ~ .WORD £€M401,DH401,DT401,DF401 
005450 075502 sas coal P 
005452 070526 073622 076076 ~ “WORD &M402,DH402,D7T402,DF 402 . 
005460 075502 Rag oe 
005462 020550 074132 076146 ~ .WORD £€M403,DH403,D1403, DF 403 
005470 075512 ees lal 
005472 070702 074446 076146 ° .WORD  EM404,,DH404,DT404 DF 404 
005 075512 lion ae 
005502 970752 074002 076076 ° .WORD £M405,DH405,DT405,DF 405 
005510 075502 lta 
005512 070756 073622 076076 ° .WORD £M406,DH406,D1406, DF 406 
005520 075502 








CKFPCAO FP11F FLTG PNT 
ERROR POINTER TABLE 


005522 
308880 
005532 
005540 
005542 
005550 
005552 
005560 
005562 
005570 
005572 
005600 
005602 
005610 
005612 
005620 
005622 
0056350 


005632 
005640 


005642 
005650 


605652 
005660 


005662 
005670 
005672 
005700 
005702 
005710 


005712 
005720 


005722 
(057 


005732 
005740 


005742 
005750 


075512 


071420 
075502 


071445 
075502 


071471 
075512 


071537 
075512 


071571 
075502 


071616 
075502 


071642 
075512 


071710 
075512 


071742 
075502 


PRT C 


074132 


074446 


074002 


073622 


074132 


074446 


074002 


073622 


074132 


074446 


074002 


073622 


074132 


074446 


074002 


073622 


074132 


074446 


074132 


MACRO M1111 


076146 


076146 


076076 


076076 


076146 


076146 


076076 


076076 


076146 


076146 


076076 


076076 


076146 


076146 


076076 


076076 


076146 


076146 


076146 


7 1TEM ” 
7 1TEM 
7 ITEM 
;1TEM 
7 1TEM 
7 ITEM 
7 1TEM 
7; 1TEM 
7; 1TEM 
7; 1TEM 


7 1TEM 421 


ITEM 422 


ZITEM 423 


ITEM 424 


7 ITEM 425 


85338 


ZITEM 426 
71TEM 427 


7 TEM 430 


71TEM 431 


28 8 


— 
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EM407,DH407,DT407,DF407 
EM410,DH410,DT410,DF410 
EM411,DH411,D7411,DF411 
EM412,DH412,D7412,DF412 
EM413,DH413,D7413,DF 413 
EM414,DH414,D7414,DF414 
EM415,DH415,DT415,DF415 
EM416,DH416,DT416,DF416 
EM417,.DH417,D1417,DF417 
EM420 ,.DH420.DT420,.DF 420 
EM421 ,DH421 ,.DT421 ,DF421 
EM422 ,DH422 ,D1422,DF 422 
EM423 ,DH423,D1423 DF 423 
EM424 ,DH424 ,DT424 DF 424 
EM425 ,DH425 ,DT425 ,DF425 
EM426 ,DH426 ,.DT426 DF 426 
EM427 ,DH427,.D1427,DF 427 
EM4 30 .DH430,.DT430,DF 430 


EM4 31 ,DH431,D1431,DF431 





CKFPCAO FPIIF FLTG PNT 
ERROR POINTER TABLE 


1091 
1093 


1094 


000052 


072250 
075502 


072275 
075502 


072321 
075512 


072455 
075512 


072507 
075512 


072564 
075502 


072612 
075502 


073426 
076003 


073462 
076003 


073514 
076003 


PRT C 


074002 


073622 


074132 


074446 


074132 


074002 


074002 


075245 


075313 


075313 


N 
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076076 


076076 


076146 


076146 


076146 


076076 


076076 


077042 


077060 


077060 


SEQ 0039 

s ITEM 432 

. WORD EM432,DH432,D7T432,DF 432 
sITEM 433 

«WORD £M433,DH433,D1433,DF433 
ZITEM 434 

~WORD EM4 34 ,DH4 34 ,D1434 DF 434 
7 ITEM 435 

.~ WORD EM435 ,DH435,D1435,DF435 
Zs ITEM 436 

WORD EM4 36 .DH436,D1436,DF 436 
s1TEM 437 

. WORD EM437,DH437,D1437,DF 437 
7 ITEM 440 

.~ WORD EM440,DH440,DT440,DF 440 
SITEM 441 

«WORD EM441,DH441,DT441,DF 441 
sITEM 442- 

.» WORD EM442 ,DH442,D7T442 DF 442 
sITEM 443 


-WORD £M443,DH443,D1443,DF 443 


-SBTTL ACT11 HOOKS 


FF RAAARARAAAEARAAAAAAARAAAARERAAAEREAEARAAAARAERERAERAAAEARARAEARREEEE 


HOOKS REQUIRED BY ACT11 


yPC=. SAVE PC 
SENDAD rr1)SET LOC.46 TO ADDRESS OF SENDAD IN .$EOP 
* WORD :22)SET LOC. 552 TO ZERO 

=$5 > 2° RESTORE P 


: =$SVPC 
.SBTTL APT PARAMETER BLOCK 
FF AAA AAAAAAEEREAAAAEAERAAERAEEREEREREERERAEEREARAREEREREREE EES 
>SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
ne, ge Sates heme aaeaiiees cet ce Pe 
.$X=. | ;;SAVE CURRENT LOCATION 
"=24  :SET POWER FAIL TO POINT TO START OF PROGRAM 
200 S:FOR APT START 
.=44  ::POINT TO APT INDIRECT ADDRESS PNIR. 
$APTHDR ::POINT TO APT HEADER BLOCK 
.=.$X = :RESET LOCATION COUNTER 
f TAAAAAAAAAAEAAAAAAAAAAAAAAAAAARAAAAAKRAAAAKARAAAAAARReRAHeAAAAAee 
“SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
; INTERFACE SPEC. 


SHIBTS: .WORD 0 3; TWO HIGH BITS OF 18 BIT MAILBOX ADDR, 
SMBADR: .WORD SMAIL ;; ADDRESS OF APT MAILBOX (BITS 0-15) 





CKFPCAO FPI11F FLTG PNT 
APT PARAMETER BLOCK 


006076 
00 


000010 
000040 


000000 
000052 


112767 


012737 


005067 
012767 
012767 


013746 


000403 
012716 
00000 

012767 
012767 


PRT C 


177777 


006402 


000176 
000174 


MACRO M1111 
$TSTM: .WORD 106 
$PASTM: .WORD 40 3 RUN Tl 
SUNITM: {WORD 0 
~ WORD SETEND-S$MAIL/2 ; é 
START: 
-SBTTL INITIALIZE THE COMMON T 
>:CLEAR THE COMMON TAGS ($CMTAG) 
MOV ASCMTAG,R6 
CLR (R6)+ 
CMP ASWR.LR6E 33D 
BNE ~6 
MOV STACK, SP 
:: INITIALIZE A FEW VECTORS 
000020 MOV #SSC 
000022 MOV #340, a#1OTVEC+2 ; 
000030 MOV #SERROR 
000032 MOV #340, O OAEMTVEC SS 
000034 MOV WS TRAP, aA TRAPVEC 
000036 MOV #340, a#TRAPVEC+2:L 
000024 MOV #SPURDN, a#PWRV 
000026 MOV #340, a#PWRVEC +2 
034336 MOV SENDCT , SEOPCT 
CLR STIMES 
CLR $ESCAPE 
172663 
3: ND-OF =PASS'' (SEOP) ROUTINE, 
000014 MOV #SRTRN, aATBITVEC 
000016 MOV #540, @*TBITVEC+2 : 
034526 MOV 1. $RTRN 
000010 MOV nes: @MRESVEC 
ort eens, -(SP) 
034502 64$: MOV #ARTT. SRTRN 
BR 66$ 
65$: ADD 
000010 66$: mh 
172560 MOV #.,SLPADR 
172554 MOV PERR 
::SI7E FOR A HARDWARE SWITCH REG 
QUAL TO A ''=1'', SETUP FOR A S 
MOV @FERRVEC, ~( 
000004 MOV #67$, are RRVEC 
172564 MOV #DSWR, S 
172560 MOV *DDISP DISPLAY 
172550 CMP #-1,aSwR 
BNE 
BR 68$ 
67$: MOY #68$, (SP) 
172530 68%: MOV #SWREG, SwR 
172524 MOV #DISPREG, DISPLAY 


B 4 
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OPE , a# 1OTVEC jtnm FOR SCOPE ROUTINE 
avEMT VEC” 3 EMT VECTOR FOR ERROR ROUTINE 


;:RUN TIM OF LONGEST TEST 
ME IN SECS. OF 1ST PASS r 1 UNIT “QUICK VERIFY) 
ADDITIONAL RUN TIME (SECS) OF A 


LENGTH MAILBOX~-E TABLE (WORDS) 


AGS 
AREA 


i3sFIRST LOCATION TO BE CLEAR: 
;;CLEAR MEMORY LOCATION 


" =;LOOP BACK IF NO 


7sSETUP THE STACK POINTER 


LEVEL 
3 eat ee FOR TRAP CALLS 


C7 POVER FAILURE VECTOR 
+ ETUR END-OF =PROGRAM COUNTER 


ty Sg NUMBER OF ITERATIONS 
+ EAR THE ESCAPE ON hs ADDRESS 


ALLOW ONE ERROR PER 


WITH 
siSET ‘." BIT VECTOR TO $RTRN 
eer SRTRN TO A RTI 

TI TRY TO. bo A RIT 


SI TRY THE R 
:eRTT IS LEGAL--SET SRTRN TO A 


T ILLEGAL=-CLEAN OFF THE STACK 


#10,S 
MmESVECS2, vamesvit TTRESTORE TRAP hte CHER 


AR ''T’' BIT Sw 


L TCH 
:TINITIALIZE THE LOOP ADDRESS FOR SCOPE 


THE at LOOP ADDRESS 


ISTER. IF NOT FOUND OR IT IS 


WARE SWITCH REGISTER. 
RROR VECT 

‘ESET UP ERROR VECTOR 

33 HARDWAR 

DWARE DISPLAY REGIST 


; HAR’ 
ETRY TO REFERENCE HARDWARE SwR 


MOVB #1 , SERMAX TEST 
a Yat | THE ‘‘T=BIT'’ TRAP vector. ee A io a Be "SRTRN’', 


RTT 


IN 


E SWICH aw 


; BRANCH IF NO TIMEOUT TRAP Ot CURES 


SISET UP FOR TRAP RETURN 
;;POINT TO SOFTWARE SwWR 


SEQ 0040 


PASS FOR EACH ADDITIONAL UNIT 


CKFPCAO FP1IF FLTG PNT PRT C 
OMMON TAGS 


INITIALIZE THE C 


006416 
006422 
006426 
0064 34 
0064 36 
006444 

1098 
006444 
006450 
006452 
006460 
006462 
606466 
006472 
006474 
006502 
0065 
006512 
006514 
006516 
006520 
006526 
006526 
0065 70 

1099 

1100 006570 

1101 

1102 

1103 

1104 

1110 

1717 
0065 70 

1112 

1113 006572 
006572 

1114 006574 

1115 006576 

1116 

1117 006600 

1118 006606 

1119 

1120 006614 

1121 

1122 

1123 

1124 006616 

1125 006616 

1126 006620 


012637 
005067 


132767 « 
14 


001403 
012767 


000403 
112767 
000420 


000004 


104413 
005000 
170100 


012737 
012737 


174007 


000004 
172676 
900200 


001340 


177777 
042736 
006530 
000042 
172636 
172430 


000001 


006636 


006614 


001240 


C 4 
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MACRO M1111 
SEQ 0041 
69$: MOV (SP)+, @#ERRVEC pig Hw 3 ERROR VECTOR 8 
CLR A ;CLEAR PASS COUNT : 
172703 BITB #APTSIZE,SENVM ie TEST USER SIZE UNDER APT 
BEQ 70$ YES,USE NON-APT SWITCH 
172674 208 #SSWREG, SWR NO, USE APT SWITCH REGISTER 
.SBTTL TYPE PROGRAM NAME 
>: TYPE THE NAME d THE PROGRAM IF FIRST PASS 
INC #-1 2 FIRST TIME? 
BNE 71$ ;BRANCH IF NO 
006042 CMP MSENDAD , 0442 SsACT=11? 
8 71$ 44 oe IF YES 
YPE ,72$ YPE ASCIZ STRING 
. SBTTL GET VALUE FOR SOFTWARE siiten + ye 
a742 ;3ARE WE RUNNING UNDER XXDP/ACT? 
BNE 73$ : ;BRANCH IF YES 
000001 CMPB SENV,41 2 ¢ARE 3 RUNNING UNDER APT? 
BEQ ;BRANCH IF YES 
000176 CMP occa 2: SOFTWARE. Swi TCH REG SELECTED? 
GTSWR IGET SOF T-SWR SETTINGS 


74$ 
#1, $AUTOB 3¢SET AUTO-MODE INDICATOR 


;GET OVER THE ASCIZ 


BR 71$ 
wo eASCIZ <CRLF>*CKFPCAO FOIE FLTG PNT PRT C*<CRLF> 
LOOP: 


BR 
172406 73$: MOVB 
74$: 


CL RAAAAAARAARAAAAAERAARAERAAEAERARAAAEAARARARAAAERARERERAEAAAEERAER EH 


tal 1 STF WITH ILLEGAL ACCUMULATOR TEST 
:*THIS IS A TEST OF THE ST INSTRUCTION USING ILLEGAL ACCUMULATOR 7, MODE 0. 


—MARAERASAASRAALASALALAASLASELARESARRR RRS ARRAS RRR RARAR RR RA RRR RRR A SD 


7811: SCOPE 
0001: 
tt :SET UP y * cat ON ERROR ADDRESS. 
CLR RO SET THE F 
LDFPS RO 
000244 MOV MOOOT,@4FPVECT ;SET UP FOR FP TRAPS, 
001236 MOV #1$,a4$TMP2 
1$: STF ACO,AC7 THIS mat INSTRUCTION SHOULD 
*CAUSE A TRAP, 
i FAILURE OF USE OF ILLEGAL ACCUMULATOR 7 TO CAUSE AN FPP TRAP, 


STFPS 


RO GET FPS. 
MOV RO, a#$TMP3 


— a 


D 4 
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1) STF WITH ILLEGAL ACCUMULATOR TEST 


170300 STST RO GET FEC. 
001242 MOV RO, @A#STMPS 
3$: ERROR +1 STF WITH ILLEGAL ACCUMULATOR, MODE 
30, DIDN'T TRAP. ST 765 TO ST 537. 
BR OOODONE 


;TRAP TO OOOT, HERE, WHEN THE EXPECTED ERROR OCCURS. 

0007: MOV (SPS RO MAKE SURE THE ERROR OCCURRED 
#008" RO ‘AT THE CORRECT ADDRESS. 

000 ‘BRANCH IF TRAP ADDRESS CORRECT. 
a#F PSPUR i IF INCORRECT 60 REPORT SPURIOUS 


at oes 1 St I 


dh 8h 2h ot ot ot SI tH 


oa 


SBIRALUNYSSSON 


GET FPS. 
:GET FEC. 
SAVE DATA INCASE OF ERROR. 


EXPECTED FPS 
EXPECTED FEC 


022626 (SP) +, (SP)+ ;RESET THE STACK. 


020204 R2,R4 WAS FPS CORRECT? 
001402 0004 BRANCH IF YES. 

' ; OTHERWISE REPORT FPS INCORRECTLY 
104002 : +2 SET AFTER USE OF ILLEGAL ACC. 
000403 BR OOODONE 


020305 : R3,R5 WAS THE FEC CORRECT? 
001401 OOODONE [BRANCH IF CORRECT 

ZOTHERWISE REPORT INCORRECT FEC 
104003 : : +3 AFTER USE OF ILLEGAL ACC. 


MAAS 
MEW 


SSOLF 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 


104412 ;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH — (HAS 
; THE USER TYPED CONTROL G?) 


'WERRARRRARASRARASLRZSALALASAARALR ELA SAR RRR RAR RRR RRR RRR ARS R RRR RRR ASSAD SD | 


:*TEST 2 FDST MODE 1, FLOATING MODE, TEST 
:sTHIS 1S A TEST OF THE STF INSTRUCTION USING FDST MODE 1. 


"RARER ERARAAREAARAAARAAAAARERAARARARAARRARERARARARERKEEKRE REE 
006006 té12: SCOPE 
PPP1: 
104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 


012700 177777 MOV #-1 ,RO ;SET UPA ous PATTERN IN THE 
012701 007070 MOV #PPPBF 0 ,R1 S INPUT BUFFER 





lites FP11F FLTG PNT PRT C MACRO M1111 
T2 FDST TEST 


MODE 1, FLOATING MODE, 
006744 012702 000014 
010021 


006754 01 ‘Hh 000200 

006762 012700 007120 

006770 012700 007104 

007012 001236 
007006 010037 001240 

007012 174010 


007014 022700 007104 
007020 001404 


007022 010037 001242 


kk ak a th th hh sh SS SY Ss 
SESRARANSESELEGEGRAS BIN 
B 
~S 
oa 
o— 
—S 
mov 
no 
WO 
NM 


007032 012700 007104 
007036 012701 007120 


1027 
007052 022720 177777 
007056 001034 
007060 022710 177777 


Sele sRases 
= 
5 


007070 177777 177777 177777 
007076 177777 177777 177777 


177777 «3177777 )=—177777 
007112 177777 177777 177777 


007120 123456 023456 
007124 034567 045671 


—_—— ee ek et od Sh od 2 Sh Sh 1 et St J Hh I 


MINMIMIMNM NOM NoNnoforo 
ahatatat ata at abot ad 
OONAO WSF WhO 

N 
= 


~~ ees oe 


20 
1221 007130 012737 007120 001242 
1222 007136 012737 007104 001240 


i225 

1226 

1227 007150 012737 007120 001242 
1228 007156 012737 007104 001240 
1229 007164 104006 


1230 
1231 007166 


PPP2: 


PPPS: 


PPPBF 0: 


E 4 
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SEQ 0043 


MOV #14,R2 
MOV RO,(R1)+ 
SOB R2,PPP2 


Vv #200,RO0 sSET FD MODE. 
LDFPS = R 
V #PPPTP?7 ,RO ;PUT TEST DATA INTO ACO. 
LDD (RO) ,ACO 
MOV #PPPBF 1 ,RO :FDST ADDRESS. 
CLR R2 ;CLEAR THE FPS. 
LDFPS R2 


MOV #PPP3 , AAS TMP2 
MOV RO, a#$TMP3 


STF ACO, (RO) ;TEST INSTRUCTION. 
CMP #PPPBF 1 ,RO WAS RO MODIFIED DURING EXECUTION? 
BEQ PPP4 ;BRANCH IF RO NOT MODIFIED, CORRECT. 
MOV RO, a#$TMPS OTHERWISE REPORT ERROR, RO MODIFIED. 
ERROR +4 
PPPDONE ;GO TO NEXT TEST. 
MOV #PPPBF 1 RO ; CHECK THE DATA IN THE OUTPUT BUFFER. 
MOV #PPPTP1 ,R1 
CMP (RO) +,(R1)+ 
BNE PPP10 BRANCH IF INCORRECT. 
CMP (RO)+,(R1) 
BNE PPP10 ;BRANCH IF INCORRECT. 
CMP #-1,(RO)+ ;WAS FLOATING MODE USeD? 
BNE PPP15 ;BRANCH IF NOT. 
C #-1, (RO) 
BNE PPP15 
BR PPPDONE ;GO TO NEXT TEST. 


-WORD -1,°1,-1,°1.°1,°1 


: WORD -1,<1,-1,-1,-1.°1 


: «WORD 123456,23456 


«WORD 34567,45671 
— IN OUT PUT Ad INCORRECT. 


#PPPTP1 ,a#STMP 
MOV PPPPBF 1 “OFSIMPS 
ERROR +5 ;BAD DATA, 
BR PPPDONE 
FLOATING MODE NOT yee BuT FD FAILED. 
MOV #PPPTP1 ,aaSTMP 
MOV #PPPBF 1, OeSIMP3 
ERROR +6 3ST 707 TO 2465 INTO 244 ‘BUT FD). 


hart FPIIF FLTG PNT PRT C 
T2 FDST MODE 1, 


007166 104412 


007170 
1242 


1243 

1244 007172 
007172 

1245 

1246 007174 


000004 


104413 


012700 
012701 
012702 
010021 
077202 


177777 
007332 
000014 
1250 007212 
1251 

1252 007214 000200 


007362 
1255 007226 


1256 
1257 007230 


172410 
012700 


005002 
170102 
012737 


174020 
022700 


007346 


007246 


007352 


001242 
007352 


007346 
007362 


177777 
177777 
1281 007330 


MACRO _M1311 
TEST 


FLOATING MODE, 


F 4 
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RSE TUP 


3GO_ INITIALIZE THE FPS AND STACK; AND 


SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 

; VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


Whe hR ARR RRRRRRARRARRSRRRARARARRRRRRARR RRR RRRR RR RRR RRR RRR RRA RSS SD! 


TSTEST 3 
* 


FDST MODE 2 TEST 


tsTHIS IS A TEST OF BOTH STF AND STD WITH FDST MODE 2. 
* 


Whee RRRRRRRR RRA RR RR RRR RR RRR RRR RRR RRR RRR RR RRR RRR RRR RRR RRA RS SRE SE SD 


TST3: 


SCOPE 


sFIRST TEST STF. 
Q0C1: ; 


QQQ2: 


001236 


00c3: 


001240 
1$: 


QQ04: 


LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #-1,RO ;SET UP THE OUTPUT BUFFER. 

MOV #Q0 RI 

MOV #14,R2 

MOV RO, (R1)+ 

SOB R2,0002 

MOV #200,R0 sSET FD MODE. 

LDFPS RO 

MOV #QQQTP1,RO ;SETUP ACO. 

LDD (RO) ,ACO 

MOV #QQQKF 7. RO sFDST ADDRESS. 

CLR R2 

LDFPS R2 sSET FPS. 

MOV #0003, a4$TMP2 

STF ACO, (RO) + sTEST INSTRUCTION. 

CMP #QQQBKF 1+4,R0 ;WAS RO INCREMENTED BY 4 PROPERLY? 
BEQ ;BRANCH IF RO CORRECT 

MOV RO. ons TMPS ;REPORT RO INCORRECT AFTER FDST MODE 2. 
MOV #QQQBF 1+4 ,a4$TMP? 

ERROR +7 ;BAD CONSTANT USED OR DIDN'T GO 527 TO 642 
BR QQQDONE 

MOV #QQQRF 1,RO ;WAS THE OUTPUT DATA CORRECT? 

MOV #QQQTP1,R1 

CMP ee (R1)+ 

BNE Q0010 ;BRANCH IF INCORRECT. 

CMP in ee (R1)+ 

BNE Q0010 :BRANCH IF INCORRECT 

CMP on +e a~-) ;SEE IF ANY OTHER DATA BUFFER WORDS WERE MODIFIED. 
BNE 00010 ‘BRANCH IF INCORRECT. 

CMP iw et A-) 

BNE Q0010 ;BRANCH IF INCORRECT. 

BR Q0020 


SEQ 0044 








heed FPIIF FLTG a _" C 
13 FDST MODE 2 T 


1282 007332 
1283 007346 
007354 
1284 007362 
1285 007364 
1286 007366 
1287 007370 
1288 
1289 007372 
290 007400 


1 4 
1291 007406 
1292 007410 
293 


WWNWNWWNWWWAANWWW 
ad ad ad cd a a ead ced cn ee 
OWOWBNOUSWN-O 

N 
§ 


peaeeiaticatht 


WG 


177777 


177777 
177777 
177777 
177777 


007362 
007346 


007332 
000014 


000200 
007362 


007346 
007460 


007356 
001242 
007356 


007346 
007362 
000004 


007362 
007346 


G 4 
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177777 
177777 
177777 
177777 


001240 
001242 


001236 


001240 


001240 
001242 


QQQBFO: .WORD =-1,-1,-1,-1,-1,-1 
QQQBF1: .WORD <-1,-1,°1,-°1.°1,°1 
QQQTPI: 76543 


43210 
;REPORT OUTPUT DATA INCORRECT: 
Q0010: MOV #QQQTP1 ,aFSTMP3 


MOV #QQQRF 1, AAS TMPS 

1$: ERROR +10 ;BAD DATA 
BR QQQDONE 

:NOW TEST STD MODE 2. 

QGQ20: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #QQQBF0,RO sSET UP DEFAULT INPUT DATA BUFFER. 
MOV RO,R1 
MOV #14,R2 


QQ022: ad RO,(R1)+ 


V #200,RO :ENTER FLOATING DOUBLE MODE. 
LDFPS RO 
MOV #Q0QTP1,RO ZLOAD ACO. 
LDD (RO) ACO 
MOV #QQQKF 1,RO :SET DESTINATION ADDRESS. 
MOV #00023, a#$TMP2 
00023: STD ACO, (RO) + : TEST INSTRUCTION. 
CMP #OQGBF 1+10, RO  :WAS RO INCREMENTED BY 10 CORRECTLY? 
BEQ 0024 “BRANCH IF CORRECT 
MOV RO. a“sTMP “REPORT RO INCORRECTLY INCREMENTED. 
MOV pooner 1710, arSTMP3 
1$: ERROR +11 :DO NOT INCREM BY 10 BAD CONSTANT 
BR QQQDONE 
@0024: MOV #QQCBF1,RO :DID THE DATA REACH THE OUTPUT BUFFER CORRECTLY? 
MOV #QQQTP1_R1 
MOV #4 R2 
1$: CMP (RO)+,(R1)+ 
BNE 00025 BRANCH IF INCORRECT. 
SOB R218 
BR QOQDONE 
:REPORT DATA INCORRECT. 
00025: MOV #OQQTP1, avSTMP3 
MOV #QQQBF 1 aaw$TMP4 
1$: ERROR +12 :BAD DATA 
QQQDONE : 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 


STHE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
[THE USER TYPED CONTROL G?). 


'WERRRRRERBRERRSSSRRSER RE RRR RES RRR RRR RRR RRR RRR RRR RRR ARR RAR RR SAAS SE SE | 


TeTEST 4 FDST MODE 2, WITH GR7, TEST 


CKFPCAO FRP1IF FLTG PNT PRT C 
FDST MODE 2, WITH GR7, 


_ 


Gama ci 
SSBGH GY 


KEFEEEELEE 


WWWAWG 


VMN 
EWN -OVDONAUEWH 
™~ 
& 


WWIWWIWWNWG 
wi yw 
N 
g 
Oo 


56 007634 


SERSSECES 


333 


es 
2 


74 007706 


WWWNWWWWNWWWWN AWA 
Yo 


a kk a ad a hh sh oh sh ho I 3 as sh ss tt Sh Sh Sh os 3 2 SH oh SH YH HY HS 


Ww 
uD 
Ww 


174027 


007634 
007702 
000004 
000200 
007712 


007732 
007632 


007722 
007634 
000004 


000003 


MACRO M1111 
TEST 


000004 
001236 


H 4 
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SEQ 0046 


i*THIS IS A TEST OF STF WITH GR? MODE 2 OR IMMEDIATE MODE. 


WEAR ABRRBARARRRERRAR RRR RRRRR RRR RR RR RRR RRR RRR RRR RRR RRR RRR RRR SRE SS | 


TST4: SCOPE 
RRR1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS 
MOV #RRR3,RO “SET UP THE DATA BUFFER FOLLOWING THE TEST INSTRUCTION. 
MOV #RRRTP1 RI 
MOV #4,R2 
1$ MOV (RO) +, (R1)+ 
SOB R2,1$ 
MOV #200,RO ZENTER FLOATING DOUBLE MODE. 
LDFPS RO 
MOV ARRRTP2,RO :SET UP ACO. 
LDD (RO) ,ACO 
MOV aRRRIO. OFERRVECT :SET UP FOR AN ODD ADDRESS. 
MOV #RRRe. , AAS TMP2 
L 


CLR R4 
STHIS IS THE TEST INSTRUCTION. IT SHOULD MODIFY THE FIRST LOCATION 
AFTER IT TO BE AN INCREMENT R4, INC R&, INSTRUCTION INSTEAD 
OF AN INCREMENT R1 INSTRUCTION. THE INCREMENT R4& SHOULD NOT BE 
sEXECUTED SINCE THE PC SHOULD BE INCREMENTED BY TWO DURING IMMEDIATE 
;MODE ADDRESSING. THUS AFTER THE EXECUTION OF THE NEXT 5 INSTRUCTIONS 
R1SHOULD weg AND R4 SHOULD CONTAIN 0. 


STD R7)+ ZTEST INSTRUCTION. 
RRR3: INC RI ‘THE STD INSTRUCTION SHOULD CHANGE THIS TO INC R4. 
INC Ri 
INC R1 
MOV #RRREXP RO :SEE IF THE DATA WAS OUTPUT CORRECTLY. 
MOV #RRR3,R2 
MOV #4 ,R3 
RRR4: (CMP (RO) +, (R2)+ 
BNE RRR2S :BRANCH IF INCORRECT. 
S0B R3,RRRG 
TST RG -MAKE SURE R4 IS 0. 
BNE RRR15 SBRANCH IF R& IS INCORRECT. 
CMP #3,R1 *SEE IF R1 IS CORRECT 
BNE RRR15 ‘BRANCH IF R1 IS INCORRECT. 
BR RRRDONE 
: THESE ARE TEST DATA PATTERNS USED TO SET UP THE OUTPUT BUFFER AT RRR3. 
RRRTP1: INC R1 
INC - R1- 
Me 
sTHIS IS THE DATA PUT IN ACO BEFORE EXECUTION OF THE STD. 
RRRTP2: INC 
INC “| 
INC Rs 
sTHIS IS THE EXPECTED DATA AT RRR3 AFTER EXECUTION OF THE STD. 
RRREXP: INC 
INC “ 
INC R1 


= FPIIF FLTG PNT PRT 


FDST MODE 2, WITH GR?, 


1426 010072 
010072 


1427 
1433 


011602 
032702 
001005 


006301 
160102 
010237 
104016 


104412 


104413 


000001 
007636 
046250 


001236 
007636 


001236 


007634 
007722 


007636 
007634 
007636 
177775 


001242 


I 4 
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TEST 


001240 


001240 
001242 


001240 


001242 


SEQ 0047 


+i te IN THE FDST FLOWS RESULTS IN AN ODD ADDRESS TRAP THROUGH 


RRR10: MOy (sp) se :SEE If THE TRAP WAS BECAUSE OF AN ODD ADDRESS. 
BNE RRR11 :BRANCH IF YES. 
CMP R2 -ARRR3+2 ‘SEE IF THE TRAP OCCURRED AT THE TEST INSTRUCTION. 
BEQ Rie ‘BRANCH IF YES. 


JMP PSPUR ;OTHERWISE REPORT A SPURIOUS TRAP THROUGH VECTOR 4. 
;REPORT: A FAILURE IN a Hh FLOWS RESULTED IN AN ODD ADDRESS TRAP. 
V 


RRR11: 
MOV #RRR3+2, aASTMP3 
CMP (SP)+, (SP)+ 
1$: ERROR +13 ;BAD CONSTANT #2 + PC ODD ADDR. 
BR RRRDONE 
RRR12: MOV R2,a@A#$TMP2 
CMP (SP)+,(SP)+ 
1$: ERROR +14 :ODD ADDRESS TRAP 
BR RRRDONE ;WRONG MODE USED. 
;REPORT DATA INCORRECT: 
RRR2S5: sd #RRR3 , AAS TMPS 
#RRREXP , aS TMPS 
1$: ERROR +15 ;BAD DATA BUT GR7 FAIL 
BR RRRDONE 


REPORT PC INCORRECT MODIFIED DURING THE EXECUTION OF FDST ne 
:MODE . THE PC SHOULD HAV BEEN INCREMENTED BY 2 BUT IT WASN 
USE _R1 AND R4& TO COMPUT, THE ACTUAL ACTION THAT WAS TAKEN ON” THE PC. 


baRi5: MOV #RRR3+2, 04S TMPS 
TST RS 31S R& CLEAR. 
BEQ 1$ 
MOV #RRR3 AAS TMPS 
BR 2s 
1$: MOV #RRR3+2,R2 
ADD #-3,R1 
ASL R1 
SUB R1,R2 
2$ MOV R2,a4$STMP4 
3$: ERROR +16 ;BAD CONSTANT PC+ 
RRRDONE : 
RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
aut ; THE DESIRE TO CHANGE THE 


SOF TWARE 
[VIRTUAL CONSOLE SWITCH + aia (HAS 
THE USER TYPED CONTROL G?) 


2 MADR RRRARRBRRARASLARRERAERRRR ARERR RARARR RR RRR ARERR RRR RRR RR ARR RRR SSS BS 


TeTEST 5 FDST MODE 4 TEST 
-* 
SeTHIS IS A TEST OF STD WITH FDST MODE 4. 


SL eeeeaaaraeaeararenananeeeanaranaananganaeaneanaaesenenanaaneese 


TSTS: SCOPE 


SSS1: 
LPERR SET UP THE LOOP ON ERROR ADDRESS. 


J) 4 
CeFPCAO FP11F FLTG PNT PRT C MACRO M1111. 24=SEP=79 15:03 PAGE 11-24 
15 FDST MODE 4 TEST 
1436 0 177777 #-1,R0 :SET UP THE OUTPUT BUFFER. 

010234 +SSSBFO, R1 
000010 #10,R2 

RO, (R1)+ 

R2.1$ 
000200 MOV #200,R0 :ENTER FLOATING DOUBLE MODE. 


010254 MOV #SSSTP1 RO :SET UP ACO. 

010274 000004 #SSS10, @MERRVECT ;SET UP FOR A TRAP TO 4. 

010154 #SSS2,a4$TMP2 

010244 #SSSA1,RO :SET UP THE DESTINATION ADDRESS. 


— ;TEST INSTRUCTION. 
010234 RO ,ASSSBFO SEE IF RO WAS DECREMENTED PROPERLY. 
SSS15 SBRANCH IF RO IS INCORRECT 
010234 #SSSBFO,RO [WAS THE OUTPUT DATA CORRECT? 
010254 #SSSTP1,R1 
000004 


#4 ,R2 
(RO) +, (R1)+ 
$$S20 


1 
; 
1 
1 
1 
1 
1 


BRANCH IF INCORRECT. 

177777 -RO :1S THE REST OF THE OUTPUT BUFFER CORRECT, -1? 
010244 ; 

000004 


;BRANCH IF INCCRRECT. 


177777 


147250 


SSSTP2: 


:1F AN ODD ADDRESS TRAP OCCURS COME HERE: 
$SS10: MOV (SP) ,RO SEE IF THE TRAP ACCURRED ON THE TEST INSTRUCTION, 
CMP RO, #SSS242 
BEQ $$$11 ;BRANCH IF YES, 
010304 ? CMP RO. #SSS2+4 
1492 010310 2 BEQ $S$11 BRANCH IF VES, 





K 4 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 11-25 
5 FDST MODE 4 TEST 


1493 010312 000137 046250 JMP @4CPSPUR sOTHERWISE GO REPORT A SPURIOUS TRAP THROUGH 4. 
1494 :REPORT FAILURE IN FDST FLOWS RESULTED IN AN ODD ADDRESS. 
1495 010316 010037 001236 $$S11: MOV avs TMP2 
149% 010322 104017 2$: ERROR Wf zFDST FORK X ODD AD RES. 
1497 010324 000426 BR SSSDONE 


REPORT RO INCORRECTLY =_ 
010037 SSS15: MOV RO, a#$TMP 

012737 001240 MOV #SSSBFO, SASTNPS 

104020 1$: ERROR +20 RO NOT DECRE PROP 
000417 BR SSSDONE 


: OUTPUT DATA INCORRECT: 
012737 010234 001240 : MOV #SSSBF 0, a#$TMP3 
010254 001242 MOV aSeeiPl. a4$TMP4 

ERROR +21 ;BAD DATA 


BR SSSDONE 
010244 001242 : MOV #SSSA1, a#STMPS 
010264 001240 MOV #SSSTP2, aaSIMP3 

ERROR +22 DATA BAD OUTSIDE TARGET AREA 


RSETUP :GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH — (HAS 
[THE USER TYPED CONTROL G?). 


'WenRARRRRRRRRASRALARERERARAAALARARRASRA RAL ARR RRR ARRAS RRR AA LARS ASAD SD | 


SeTEST 6 FDST MODE 3 TEST 

** 

t*THIS IS A TEST OF FDST MODE 3 USING STD. 
*” 


. 
SC FMA AARAEAAAAAAAARAAAARAAAAAAAAHORARAARAAAAARARAAAEAAAAAARAAAATARARS 


TST6: 


TTT1: 
: T LOOP ON ERROR ADDRESS. 
010526 #TTTBFO,R1 : THE OUTPUT DATA BUFFER. 
177777 #-1,R0 
000012 #12,R2 
RO, (R1)+ 


R2,1 
010526 #TTIBFO,a#TTTA2 
000200 #200,R0 


6 ENTER DOUBLE FLOATING MODE. 
010552 MOV th hy RO iSET UP ACO. 


RO) 
010562 arrTio. QvERRVECT :SET UP FOR TRAPS TO 4, 
000006 TTT2, a¢$TMP 
010542 #TTTA2,RO :SET UP THE DESTINATION ADDRESS. 


ACO, a@(RO)+ TEST INSTRUCTION, 


010544 RO, #TTTA2+2 :SEE IF RO WAS INCREMENTED CORRECTLY. 
TTT15 *BRANCH IF INCORRECT. 
012 010526 #TTTBFO,R1 >CHECK THE OUTPUT DATA BUFFER. 
012702 010552 #TTTIP).R2 


geEY 





_ FPIIF FLTG PNT - C 


DST MODE 3 TEST 
012703 
022122 
001045 
077303 
000452 


177777 


vv 
oon 


4 w~ 44 


556 071727 
560 


0562 011602 
564 


W358 
~~ 2 
Oo 
8 
Mm 
MN 
~S 


10576 001402 
0600 


74 010604 010237 

0 022626 
76 010612 104023 
77 010614 000416 


MAMA AVI UT 
a 
oS 
out 
& 


3a 


010616 010037 
1 010622 012737 
010630 104024 
0 000407 


586 010634 012737 
58 


000004 


010474 
010476 
046250 


001236 


001242 
010544 


L 4 
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001240 


SEQ 0050 
MOV #4 ,R3 
TTT3: CMP (R1)+, (R2)+ 
BNE TTT20 sBRANCH IF NOT CORRECT. 
SOB R3,TTT3 
BR TT TDONE 
:THIS IS THHE OUTPUT DATA BUFFER: 
TTTBFO: = 
-1 
-1 
-1 
TTTAi: <1 
TTTA2: TTTBFO 
TTTA3: =1 . 
=} é 
TTTTP1: 101213 
141516 
71727 
37475 
; TRAP THROUGH VECTOR 4 TO HERE. 
TTT10: MOV (SP) ,R2 sSEE IF THE TRAP ADDRESS IS THAT OF THE TEST INSTRUCTION. 
CMP Re. ATTT2+2 
BEQ 11 ;BRANCH IF YES. 
CMP Re TyTTass 
BEQ TTT11 :BRANCH IF YES 
JMP a4 CPSPUR SOTHERWISE GO REPORT A SPURIOUS TRAP TO 4. 
;REPORT A FAILURE IN THE FDST FLOWS RESULTED IN AN ODD ADDRESS TRAP. 
TTT11: MOV R2,a#STMP2 
CMP (SP) +, (SP)+ 
1$: ERROR +23 :BET FDST X ODD ADR 
BR TT TDONE 


=REPORT Fe INCORRECT: 


RO, a#STMPS 
MOV #TTTA2+2, aaSTMP3 
1$: ERROR +24 RO NOT INCREMENT PROPERLY 
BR TT TDONE 


REPORT INCORRECT OUTPUT DATA: 
TTT20: MOV #TTTBFO, aaSTMP3 
MOV ATTTTP1 @aSTMP4 
1$: ERROR +25 BAD DATA 


RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
: SEE IF THE USER HAS ee ast 
THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH lala (HAS 
; THE USER TYPED CONTROL G?) 


J SAHARA AAAAEAAAAAAAAAAEHAAAAAAEHAAAAEAAEAEERAREHRA RHE RATAR ARR REEe 


;#TEST 7 FDST MODE 5 TEST 
teTHIS IS A TEST OF FDST MODE 5 USING STD. 


ous FP11F FLTG PNT PRT C 


FDST MODE 5 TEST 


oo0o00°o 
3 = 
Ss 
o 


SORSSes3 Zs 
So 


2 
1607 010714 


1621 010774 
1622 


1623 
ioc’ 010776 
1625 011000 


010776 


P 
we .« 


010776 
177777 
000012 
010776 
000200 
011022 
011032 
000006 
011012 
011010 


010776 
011022 
000004 


M 4 
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MARR RARRSRARASRRSRRRASRARAAAARARARARR RARER RRRRRA RAR RRARRR RRR RASS SS | 


MACRO M1111 
oe 
1817: 
UUU1: 
1$: 
011010 
000004 
001236 
UUU2: 
Uuu3: 


UUUA1 : 


SCOPE 


:SET UP THE LOOP ON ERROR ADDRESS. 
mUUUB BFO.RI ‘SET UP THE OUTPUT DATA BUFFER. 
#12.R 
RO, (R1)+ 
R2.1$ : 

#200,R0 sENTER DOUBLE FLOATING MODE. 
#UUUTP1 ,RO :SET UP ACO. 

(RO) ACO 

#UUUI0, AERRVECT ;GET READY FOR ANY TRAPS TO 4. 
UUU2, a#$TMP2 

MUUUA2 RO :SET UP THE DESTINATION ADDRESS. 
ACO,a-(RO) ‘TEST INSTRUCTION. 

RO, #UUUA2=2 [WAS RO DECRIMENTED PROPERLY? 
UUU15 ‘BRANCH IF RO IS INCORRECT 
#UUUBF0,R1 ‘WAS THE DATA OUTPUT CORRECTLY? 
MUUUTP) .R2 

#4 ,R3 

(Ri)+, (R2)+ 

UUU BRANCH IF DATA IS INCORRECT. 
R3,UUU3 

UUUDONE 


SEQ 0051 


CKFPCAO FPIIF FLTG PNT PRT C 
17 FDST MODE EST 


163) 011012 
1632 011014 
1633 011016 
1634 011020 
1635 011022 
1636 011024 
1637 011026 
1638 011030 
1639 
1640 
1641 011032 
1642 011034 
1643 011040 
1644 011042 
1645 011046 
1646 011050 
1647 
1648 011054 
1649 011060 
1650 011062 
1651 011064 
1652 
1653 
1654 011066 
1655 011072 
1656 011100 
1657 011102 
1658 
1659 
1660 011104 
1661 011112 
1 011120 


MACRO M1111 
5 T 
177777 vn -1 
177777 UUUA3: <1 
177777 -1 
177777 -" 
020212 UUUTP1: 20212 
Bs 7Ss6 $2556 
02627 2627 
031323 031323 
;1F A TRAP TO 4 OCCURS COME HERE. 
01160 UUU10: MOV (SP),R ;SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
020227 010744 CMP R2, M#UUU2+2 
001405 BEQ UUU11 ;BRANCH IF YES. 
020227 010746 CMP at | peal 
00140 BEC ;BRANCH IF YES 
000137 046259 JMP tp SPUR ; OTHERWISE REPORT A SPURIOUS TRAP TO 4. 
~REPORT FAILURE OF FDST RESULTED IN AN ODD ADDRESS TRAP TO 4. 
010237 001236 UUU11: MOV R2,a4$TMP2 
022626 CMP (SP)+, (SP)+ 
104026 1$: ERROR +26 ;BET FDST X ODD ADR *s 
000416 BR UUUDONE 
;REPORT - # INCORRECT. 
010037 001242 UUU15: RO, aS TMP4 
012737 011014 001240 mov MUUUA2+ 2, AAS TMP 
104027 1$: ERROR +27 7RO NOT INCREMENT PROPERLY 
000407 BR 
;REPORT BAD DATA. 
012737 010776 001242 UUU20: MOV MUUUBF 0, a4S TMPS 
012737 011022 001240 MOV #UUUTP1 , aS TMP 
104030 1$: ERROR +30 ;BAD DATA 


N 4 
24=SEP=79 15:03 PAGE 12 


7.4 


SEQ 0052 


CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 13 
FDST MODE 5 TEST 


SEQ 0053 


1664 011122 UUUDONE : 
011122 104412 RSE TUP 


3GO INITIALIZE THE FPS AND STACK; AND 
:SEE IF THE USER HAS ee at 

THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 





—_ 


. 3 
ad FPIIF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 15 
T10 FDST MODE 6, INDEX MODE, TEST 


1673 SERRA ARERR RARER EERE EERE ERERRERERE EERE RARER ERER ER EERE REE 


SeTEST 10 FDST MODE 6, INDEX MODE, TEST 
-* 
te THIS IS A TEST OF FDST MODE 6, INDEX MODE, USING STD. 


° 
s RRAAAAAARARERAERAARRAERARAERAARAREARERRARRARRARARARRERARRRERARAARAEN 


011124 000004 TS110: SCOPE 


SEQ 0054 





=——_ 





D 
Na FPIIF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 16 


T10 FDST MODE 6, INDEX MODE, TEST SEQ 0055 
1675 
1676 011126 v1: 
011126 106413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
1677 011130 012700 000200 MOV #200,R0 TENTER DOUBLE FLOATING MODE. 
1678 011134 170100 LDFPS RO 
1679 011136 012701 011246 MOV #VVVBFO.R1 :SET UP THE OUT PUT DATA BUFFER. 
1680 011142 912700 177777 MOV wl oR RO 
1681 011146 012702 000004 MOV R2 
1682 011152 010021 1$: MOV RO (R1)+ 
1683 011154 077202 SOB R 
1684 011156 012737 011266 000004 MOV #vvV10, @MVERRVECT ;SET UP VECTOR 4 INCASE OF ERROR. 
1685 011164 012700 011256 MOV #VVVTP RO :SET UP ACO. 
1686 011170 172410 LDD (RO) ACO 
1687 011172 012737 011210 001236 MOV #VVV2, AAS TMP2 
1688 011200 012700 003345 MOV #VVVBFO-5701, RO ;SET UP THE DESTINATION ADDRESS. 
1689 011204 012701 000001 MOV 
oy 011210 174060 005701 VVVe2: STD 4065707 (ROD sTEST INSTRUCTION. 
1692 011214 020027 003345 CMP RO, AVVVBFO-5701 :SEE IF RO WAS MODIFIED. 
1693 011220 001040 BNE vvv15 ‘BRANCH IF INCORRECT 
1694 011222 012702 011246 MOV #VVVBFO,R2 zWAS THE OUTPUT DATA. CORRECT. 
1695 011226 012703 011256 MOV #VVVTP1_R3 
169% 011232 012704 000004 MOV #4 RS 
1697 011236 022223 1$: CMP (R2)+, (R3)+ 
1698 011240 001037 BNE vvv20 BRANCH IF INCORRECT DATA. 
1699 011242 077403 SOB R4,1$ 
1700 011244 44 BR VVVDONE 
1701 011246 177777 VVVBFO: =1 
1702 011250 177777 of 
1703 011252. 177777 -1 
1704 011254 177777 @} 
1705 011256 030313 VVVTP1: 30313 
1706 011260 023334 23334 
1707 011262 035363 35363 
1708 011264 074041 74041 
1710 Sey HERE AFTER A TRAP THROUGH VECTOR 4. 
1711 011266 011602 VV v10: MOV (SP) ,R2 SSEE OF THE TRAP OCCURRED ON THE TEST INSTR. 
1712 011270 020227 011212 CMP Re AVWV2+2 
1713 011274 001405 BEQ vv11 ;BRANCH IF YES. 
1714 011276 020227 011214 CMP Re aVW2s4 
1715 011302 001402 BEQ vii ;BRANCH IF YES 
1716 0113046 000137 046214 JMP Ser PSPUR THERWISE GO REPORT SPURIOUS TRAP TO 4. 
717 ;REPORT FAILURE OF FDST RESULTED ON AN ODD ADDRESS TRAP TO 4. 
1718 011310 010237 001236 VVV11: MOV R2,a#STMP2 
1719 011314 022626 CMP (SP) +, (SP) + 
1720 011316 104031 1$: ERROR +31 sFDST FORK X ODD ADD 
vet 011320 000416 BR VVVDONE 
1723 REPORT RO MODIFIED. 
1724 011322 010037 001242 | vwv15: RO, a#STMP4 
1725 011326 012737 003345 001240 mov AVVVBF 0-5701, aS TMP3 
1726 011334 104032 1$: ERROR +32 :RO MODIFIED! 
1227 011336 000407 BR VVVDONE 
1729 ‘ REPORT INCORRECT DATA. 
1730 011340 012737 011246 0012460 Wvv20: MoV AVVVBFO, aaSTMP3 


— 





‘Ned aahy FLTG PNT PRT C 
110 FDST MODE 6, 













1756 01144 


me ee el ee ee eed eed ed 
LAI tad A RRORGAD oo a 0 oO 
RENSRRNSSRNVORR 





012737 
104033 


104412 


177777 
177777 


INDEX MODE, 


011256 001242 


000200 


011510 
177777 
000004 


011540 
011520 


011452 
003627 


000001 
011510 
005701 


003627 
011510 


011520 
000004 


000004 


001236 


011530 


MACRO M1111 
TEST 


E 
24-SEP=79 15:03. PAGE 16-1 


MOV MVVVTP1 ,aaSTMPS 
ERRCR +33 ;BAD DATA 


SETUP 3GO_ INITIALIZE THE FPS AND STACK; AND 
7SEE IF THE USER HAS EXPRESSED 
Aap, DESIRE TO CHANGE THE SOFTWARE 
; VIRTUAL CONSOLE SWITCH nae (HAS 
; THE USER TYPED CONTROL G?) 


Wen PAAR ARRERRERRARARALARASALARASASARASEARRRARRR RE LAS SAAR EARS SASS SG 


:#TEST 11 FDST MODE 7, INDEX DEFERRED MODE, TEST 
isTHIS IS A TEST OF FDST MODE 7, INDEX DEFERRED MODE, USING STD. 


mA AAAS RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR ARR RRR ARRAS SDD DS | 


VVVDONE : 


rST11: SCOPE 

Www : 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
ee + RO ;ENTER DOUBLE FLOATING MODE. 
MOV MWWWIBFO,R1 ;SET UP THE OUTPUT DATA BUFFER. 
MOV ad RO 
MOV 

1$ MOV RO CRIS 
SOB R 


MOV #10, @MERRVECT ;SET UP FOR TRAPS TO 4. 
P1,RO :SET UP ACO. 


MOV Hw? , AAS TMP2 
MOV pore + a He RO ;SET UP THE DESTINATION ADDRESS. 
mov #1,R1 

V 


AWAMIBE 0, QA WBF 7 
4°0,a5701(RO)  ;TEST INSTRUCTION. 


CMP RO ,AWWWBF1-5701 ;I1S RO CORRECT? 

BNE WW 5 BRANCH IF INCORRECT. 

MOV MWWIBF O ,R2 WAS THE DATA OUTPUT CORRECTLY? 
MOV MMMITPT RS 


#4 RG 
(R2)+, (R3)+ 
BNE www20 :BRANCH IF DATA IS INCORRECT. 
SOB R4,1$ 
BR WwWwDONE 


SEQ 0056 








-™ 
CKFECAO FRIIF FLTG PNT PRT MACRO M1111 24=SEP=79 15:03 PAGE 16=2 
T11 FDST MODE 7, INDEX DEFERRED MODE, TEST SEQ 0057 
1781 ; TRAP THROUGH 4 7 HERE. 
1782 011540 011602 WwwWw10: MOV (SP) ,R2 ;SEE IF THE TRAP OCCURRED ON THE TEST INSTR. 
1783 011542 020227 011454 CMP R2 , MW? +2 
1784 011546 001405 BEQ Wh 1 ;BRANCH IF YES. 
1785 011550 020227 011456 CMP R2 ,AWW2 +4 
1786 011554 001402 BEQ 11 BRANCH IF YES. 
1787 011556 137 046214 JMP a4F PSPUR SOTHERWISE GO REPORT SPURIOUS TRAP TO 4. 
1788 ;REPORT FAILURE OF FDST FORK RESULTED IN AN ODD ADDRESS TRAP TO 4. 
1789 011562 010237 001236 WWwwWw11: MOV R2,a4$STMP2 
1790 011566 022626 (MP (SP) +, (SP)+ 
1791 011570 104034 1$: ERROR +34 sFDST FORK x ODD ADD 
1 011572 000416 BR WhwWD ONE 
1794 ;REPORT 4 heat ow 
1795 011574 010037 001242 Www15: RO, a#STMP 
1796 011600 012737 003607 001240 MOV MAMEF 05701 ,aASTMP3 
1797 011606 104035 1$: ERROR +35 RO MODIFIED! — 
ba. 011610 07 BR WWwWDONE 
1800 ;REPORT DATA INCORRECT 
1801 011612 012737 011510 001240 Www20: MOV MWWWBF O , aS TMP 3S 
1802 011620 012737 011520 001242 MOV M#WWWTP1 , aASTMPS 
1803 011626 104036 1$: ERROR +36 ;BAD DATA 
1804 011630 WWWDONE : 
011630 104412 RSETUP 7GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
; VIRTUAL CONSOLE SWITCH REGISTER ‘HAS 
1805 ; THE USER TYPED CONTROL G?). 
1811 PLR EERE EERE RRR EERE ERE ERE EEE RE ERE 
S*TEST 12 STCFD TEST 
s*THIS IS A TEST OF THE STCFD INSTRUCTION. 
PLATE EERE REE EERE EEE EERE RP ERR R ER ER ee 
812 011632 000004 TST12: SCOPE 
1813 3AC=0 
1814 011634 XKX1: 
011634 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
1815 011636 004767 000350 JSR PC,.STCFDS 
1816 011642 000000 1$: 0 3AC 
1817 011644 000000 0 
1818 011646 000000 0 
1819 011650 000000 0 
1820 011652 000000 2$: 0 sRES 
1821 011654 000000 0 
1822 011656 000000 0 
01 000000 0 
1824 011662 000000 3$: 0 ERROR RES. 
1825 011664 000000 0 
1826 011666 177777 ot 
011670 177777 -1 
1828 011672 047000 4$: 47000 FPS BEFORE EXECUTION. 
1829 011674 047004 47004 zFPS AFTER EXECUTION, 
1830 011676 177777 = FEC 





G 
PCAO FP1IF FLTG PNT PRT ( MACRO M1111 24=SEP=79 15:03 PAGE 16-3 


CKF 
Ti2 STCFD TEST SEQ 0058 

1831 011700 147004 147004 ;ERROR FPS. 
1832 011702 104042 Jes ERROR +42 SFDFL<==<-FDFLXST 767 
1833 011704 000401 BR 6$ ‘ 
1834 011706 104043 ERROR +43 ;BUT EZBT x ST560 TO 061 INTO 261 
1835 011710 6$: 
1836 ; 
1837 011710 KKM: 

011710 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
1838 011712 004767 000254 JSR PC,STCFDS 
1839 011716 017203 1$: 17203 3AC 
1840 011720 142536 142536 
1841 011722 06 7506 
1842 011724 172031 172031 
1843 011726 017203 2$: 17203 sRES 
1844 011730 142536 142536 
1845 011732 0 
1846 011734 000000 0 
1847 011736 017203 3$: 17203 ERROR RES. 
1848 011740 142536 142536 
1849 011742 047506 47506 
1850 011744 172031 172031 
1851 011746 040000 4S: 40000 sFPS BEFORE EXECUTION. 
1852 011750 040000 40000 sFPS AFTER EXECUTION. 
1853 011752 177777 -1 sFEC 
1854 011754 177777 -1 ;ERROR FPS. 
1855 011756 104044 5$: ERROR +44 2X11(1,0)<=--0 XK ST766 
1856 011760 000401 BR 6$ 
1857 011762 104040 ERROR +40 
1858 011764 6$: 
1859 ; 
1860 011764 KXX3: 

011764 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
1861 011766 004767 000200 JSR PC,STCFDS 
1862 011772 050717 1$: 50717 sAC . 
1863 011774 027374 27374 
1864 011776 075767 75767 
1865 012000 077071 77071 
1866 012002 050717 23: 50717 sRES 
1867 012004 027374 27374 
1 012006 0 
1869 012010 000000 0 
1870 012012 000000 3$: 0 ERROR RES. 
1871 012014 000000 0 
1872 012016 000000 0 
1873 012020 000000 0 
1874 012022 047000 4$: 47000 sFPS BEFORE EXECUTION. 
1875 012024 047000 47000 :FPS AFTER EXECUTION. 
1876 012026 177777 =) sFEC 
1877 012030 174002 174002 ERROR FPS. 
1878 012032 104045 S$: ERROR +45 ;BUT OPIC X ST251 
1879 012034 000401 BR 6$ 
1880 012036 104046 ERROR +46 ;BUT EZBT & ST421 
1881 012040 6$: 
1882 ; 
1883 012040 KMS: 

12040 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 


0 
1884 012042 004767 000124 JSR PC,STCFDS 








CKFPCAO FPIIF FLTG PNT PRT C 


T12 


STCFD TEST 
1885 012046 020212 
1886 012050 032425 
1887 612052 026272 
1888 012054 002123 
1889 012056 020212 
1890 012060 032425 
1891 012062 
1892 012064 
1893 012066 020212 
1894 012070 032425 
1895 012072 1 
1896 01207 
1897 012076 040000 
1898 012100 0000 
1899 012102 177777 
1900 012104 177777 
1901 012106 104047 
1902 012110 000401 
1903 012112 104040 
1904 012114 
1905 
1906 012114 

012114 104413 
1907 012116 004767 
1908 012122 121314 
1909 012124 151617 
1910 012126 101112 
1911 012130 131415 
1912 012132 121314 
1913 012134 151617 
1914 012136 000000 
1915 012140 000000 
1916 012142 021314 
1917 012144 151617 
1918 012146 000000 
1919 012150 000000 
1920 012152 040000 
1921 012154 040010 
1922 012156 177777 
1923 012160 177777 
1924 012162 104050 
1925 012164 01 
1926 012166 104040 
1927 012170 000535 
1928 
1929 
1930 
1931 
1932 
1933 
1934 
1935 
1936 
1937 
1938 


000050 


H 5 
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1$: 


3$: 


4$: 


5$: 


6$: 


MNIWO MN 
ail al aailh <i ll wel 
NE MANON SS 


wna 


3RES 
ERROR RES. 


FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 


3 FEC 
ERROR FPS. 
+47 ;BUT FD IN ROUND xX ST113 


7SET UP THE LOOP ON ERROR ADDRESS. 
cae uate 


3RES 
ERROR RES. 


:FPS BEFORE EXECUTION. 
ZFS AFTER EXECUTION. 
“ERROR FPS. 

+50 :BUT ENBT X ST567 OR BAD SIGN ST460 


; THIS SUBROUTINE, STCFDS, IS USED TO SET UP we OPERANDS, EXECUTE 


THE STCFD INSTRUCTION AND CHECK THE RESULTS. 


CALL 


:TO IT IS MADE THUS: 





JSR PC ,@A#STCFDS 

ACARG: .WORD X,X,X,x sAC_OPERAND 

RES: «WORD X,X,X,Xx EXPECTED RESULT 
ERRES: .WORD X,X,X,X ERROR RESULT 

FPSB: -WORD =X FPS BEFORE EXECUTION 


SEQ 0059 





CKFPCAO FRUIF FLTG PNT PRT C 
STCFD TEST 


Tl2 


1965 012174 


1977 012242 
1979 


012601 


016137 
010102 
062702 


MACRO M1111 


001236 


001242 
001252 


I 
24=SEP=79 15:93 PAGE 16-5 


FPSA: «WORD X FPS AFTER EXECUTION 
FEC: «WORD =X TEXPECTED FEC 
ERFPS: .WORD xX ERROR FPS. 
ERR1: ERROR +x DATA ERROR. 
BR CONT 
; ERR2: ERROR +X ;FPS ERROR. 
: CONT : “RETURN ADDRESS 


STHE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). 
>THE STCFD INSTRUCTION IS EXECUTED 


THEN 


:THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
; COMPARED WITH FPSA_IF THIS TOO IS CORRECT STCFDS gi CONTROL 
;TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STCFD ow. 


[COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN STCFDS WILL RE TURN 
:TO THE ERROR CALL AT ERR2, OTHERWISE STCFDS ITSELF 
[REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 
:STCFD IS_ INCORRECT, THE INCORRECT RESULT IS Se sale WITH THE 
ZANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 
>THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN STCFDS 
sWILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 
SRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STCFDS WILL 
;REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


STCFDS: MOV (SP)+,R1 PICK UP THE POINTER TO THE OPERANDS. 
MOV #200,R0 SENTER DOUBLE FLOATING MODE. 
LDFPS RO 
MOV 1,R :LOAD ACO. 
LDD (RO) ,ACO 
MOV #-1,R0 :FILL THE OUTPUT BUFFER WITH -1°S. 
MOV #STCRT, R2 
MOV 4.R 
1$ MOV RO’ (R2)* 
SOB R3,1$ 
MOV 30(R1),RO :LOAD THE FPS. 
LDFPS RO 
MOV #2$, aASTMP2 
MOV #STCFT,RO :SET UP THE DESTINATION ADDRESS. 
2s: STCFD ACO, (RO? “TEST INSTRUCTION. ‘ 
STFPS R4 :GET THE FPS. 
STST ~—R5 “GET THE FEC 
MOV R1,R2 >SAVE THE DATA IN CASE OF ERROR. 
MOV R2. a#STMP3 
ADD #10,R2 
MOV AAS TMPS 
MOV ASTCFT, aa$STMP4 
MOV R4, aASTMP7 
MOV 32(R1) ,a#$TMP10 
MOV R1,R2 SCHECK THE RESULT 
ADD #10,R2 
MOV wstCrT, R3 
MOV 
3$: CMP vars. ites 
BNE 15$ :BRANCH IF INCORRECT. 


SEQ 0060 














STCFD 
1998 012336 


BYVBBByyy 
ee a ot wt 
DONAUSWM—O 


oe FP11F FLTG PNT 
T12 TEST 


016102 
020 


104037 


PRT C 


000032 


000036 
000046 


000020 
012454 
000004 


000040 


MACRO M1111 


4$: 


;RESULT 
15$: 


16$: 


24-SEP=79 15:03 PAGE 16-6 


40(R1 
ZOTMERWISE. REPORT RESULT INCORRECT HERE. 
18$: 





SEQ 0061 


MOV 32(R1) ,R2 
a R2,R4 71S THE FPS CORRECT? 


E 20$ ;BRANCH IF FPS INCORRECT. 
TST R2 1F EXPECTED FPS IS NEGATIVE, THEN 
BPL 4$ 3;GO AHEAD-AND CHECK THE FEC. 
CMP 36(R1),R5 
BNE 25$ ;BRANCH IF FEC IS INCORRECT. 
JMP 46(R1) RETURN. 


INCORRECT: 
MOV 






R1,R2 ;SEE IF ERROR WAS ANTICIPATED. 
ADD #20,Re 
MOV MSTCFT,R3 
MOV #4 RO 
CMP (R2)+,(R3)+ 
BNE 17$ ;BRANCH IF NOT ANTICIPATED. 


_ RO, bs 
;1F ERROR WAS ANTICIPATED RETURN. 


ERROR +37 ;DATA ERROR 


K 
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fh STCFD TEST SEQ 0062 
2020 012416 000760 BR 4$ 
2022 -FPS INCORRECT: 
2023 012420 020461 000034 50S: CMP R4,34(R1) ;WAS THE ERROR ANTICIPATED. 
2024 012424 001002 BNE 21$ ‘BRANCH IF NOT ANTICIPATED. 
2025 012426 (00161 000044 JMP 44(R1) ‘IF IT WAS ANTICIPATED RETURN. 
2027 >THE FPS ERROR WAS NOT ANTICIPATED SO REPORT FPS INCORRECT HERE. 
2028 012432 21$: 
2029 012432 104040 228: ERROR +40 sFPS xX 


2030 012434 000751 
2031 


2032 ;REPORT FEC INCORRECT: 
2033 012436 016137 000036 001256 25$: MOV a cast a 


2034 012444 010537 001254 MOV R5 
2035 012450 104041 26$: ERROR +41 sFEC X 
2036 012452 000742 BR 4$ 
2037 012454 177777 177777 177777 STCFT: =1,-1,-1,-1 
012462 177777 
2038 012464 XXXDONE : 
012464 104412 RSE TUP = GO INITIALIZE THE FPS AND STACK; AND 


THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 


039 
4 SEERA RRR RR EKEREEEREEEREKERE ERE A REE ERE EERE ARERR RHEE 
s*TEST 13 STCDF TEST 
** 
z*THIS IS A TEST OF THE STCDF INSTRUCTION. 
** 
2s -PaRRBRBSBSASAALALZALASSAAASASRAASA ASA SARRRARR ARR AAR RRRRARARRS RRR ARRAS RASS SD | 
012466 000004 TST13: SCOPE 
gone 
204 zAC=0 
o0c8 012470 vyYY1: 
_ 012470 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2049 012472 004767 000330 JSR PC,STCDFS 
2050 012476 000000 1$: 0 ZAC 
2051 012500 000000 0 
2052 012502 000000 0 
2053 012504 000000 0 
506 000000 23: 0 sRES 
2055 012510 000000 0 
2056 012512 177777 -1 
2057 012514 177777 -1 
2058 012516 000000 3$: 0 Z;ERROR RES. 
2059 012520 000000 0 
2060 012522 000000 0 
2061 012524 000000 0 
2062 012526 047200 4$: 47200 sFPS BEFORE EXECUTION. 
2063 012530 047204 47204 ZES AFTER EXECUTION. 
2064 012532 177777 -1 FEC 
2065 01 177777 -1 TERROR F PS. 
2066 012536 104054 5$: ERROR +54 sFDFL<=---FDFL Xx ST767 
2067 012540 000401 BR 6$ 
2068 012542 104052 ERROR +52 7FPS INCORRECT. 





L 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 17=1 
113 STCDF TEST 


2069 012544 
2070 
2071 012544 
012544 3 ERR 
2072 012546 7 PC,STCDFS 
20735 012552 - : 574 


;SET UP THE LOOP ON ERROR ADDRESS. 


sRES 
ERROR RES. 


7;FPS BEFORE EXECUTION. 
oer AFTER EXECUTION. 


TERROR FPS. 
“EITHER ROUND FAILED OR WENT TO 766 X1(1,0)<==-0 INTO 767 


;SET UP THE LOOP ON ERROR ADDRESS. 
ACO 


PC, STCDFS 


RES 
;ERROR RES. 


FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 


iFEC 
ERROR FPS. 


;BUT EZBT XK ST421 TO 062 INTO 262 


;SET UP THE LOOP ON ERROR ADDRESS. 
3;AC0 


— — ek eet ad ed ed 


PC,STCDFS 


— at od od me kk dd od 


MoMEMOMPENM_—MOMENONMENMONONoNoNoNNy 





M 
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113 STCDF TEST. 


2123 age 2$: ;RES 
2124 01271 


Mm 
— 
Nm 
wa 
oo 
ad ad od 
Mn 
NN 
ab and 
as 


, 
3$: , ERROR RES. 


; 
4$: zFPS BEFORE EXECUTION. 
EPS AFTER EXECUTION. 


TERROR FPS. 
5$: 


MONGMINNNNNoNNery 
ad ca anh at ch at aad eat eh et od 
RARAYASSRVE 

lelelelelelelelelele) 


;BUT FIV ST262 TO 123 INTO 103 
2138 012750 6$: 
2139 ; 
2140 012750 
012750 3 SET UP THE LOOP ON ERROR ADDRESS. 
2141 012752 00476 8 JSR PC, STCDFS att 


23: sRES 
0 
3$: ERROR RES. 


4$: FPS BEFORE EXECUTION. 
ZFPS AFTER EXECUTION. 
ERROR F 
5$: = +60 BUT PIV. $1262 FAIL TO 103 INT 123 


6$ 
+61 BUT FLAG ST 147 X TO ST 361 INTO 365 


6$: BR YYYDONE 

:THIS SUBROUTINE, STCDFS, IS USED TO SET UP THE OPERANDS, EXECUTE 
THE STCDF INSTRUCTION AND CHECK THE RESULTS. A CALL 

:T0 17 IS MADE THUS: 


JSR 
ACARG: :AC_OPERAND 

RES: WOR EXPECTED RESULT 
oy ERROR RESULT 

FPSB: FPS BEFORE EXECUTION 
AS oy FPS AFTER EXECUTION 
FEC: . speet ie FEC 
ERFPS: .WOR ERROR FPS. 
ERR1: 4 DATA ERROR. 


ERR2: FPS ERROR. 
CONT: RETURN ADDRESS 





CKFPCAO FP11F FLTG PNT PRT C 
TEST 


713 


STCDF 


2226 0131 0 
2227 
2228 013172 


016137 
010102 


000200 


177777 
013310 
000004 


000030 


013102 
013310 


000032 


000034 
000046 


MACRO M1111 


;THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). 


N 
24=SEP=79 15:03 PAGE 17-3 


THEN 


:THE STCFD INSTRUCTION IS EXECUTED. 


THE RESULT IS CHECKED cant te RES. IF 
[COMPARED WITH FPSA IF THI 


:T0 THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD 


; COMPARE IT 


:T0 THE ERROR CALL AT ERR2, OTHERWISE STCFDS ITSELF 


REPORTS THIS FAIL 
SSTCFD IS_INCORRECT, 


URE AND THEN 


URNS TO CONT 


ZANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 
:THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN STCFDS 


[WILL TRANSFER CONTROL TO THE ERROR CAL 


L_AT ERR. 


ZRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STCFDS WILL 


;REPORT THE FAILURE AFTER WHICH 
STCDFS: 


1$: 


001236 
2$: 


001242 


001252 


3$: 


4$: 


MOV 
MOV 
LDFPS 
MOV 


(SP)+,R1 :PICK UP THE POINTER TO THE OPERANDS. 
#200, RO ‘ENTER DOUBLE FLOATING MODE. 
RO ZLOAD ACO. 
Cr) ACO 
RO :FILL THE OUTPUT BUFFER WITH -1°S. 
asteor. R2 
4.R3 
RO, (Ras 
50(R1) .RO :LOAD THE FPS. 
#2$, a#STMP2 
#STCDT,RO :SET UP THE DESTINATION ADDRESS. 
ACO, (RO) ‘TEST INSTRUCTION. 
R4 :GET THE FPS. 
R5 [GET THE FEC. 
R1,R2 ‘SAVE THE DATA IN CASE OF ERROR. 
R2. a#STMP3 
#10,R2 
R2, a#STMPS 
#STCDT, aS TMP4 
R4, @ASTMP7 
32(R1) ,a#STMP10 
R1,R2 sCHECK THE RESULT. 
#10,R2 
#STCDT.R3 
#4 RO 
(R2)+, (R3)+ 
15$ :BRANCH IF INCORRECT. 
RO, 3$ 
32(R1) .R2 
R2,R4 :1S THE FPS CORRECT? 
208 “BRANCH IF FPS INCORRECT. 
R2 iF EXPECTED FPS IS NEGATIVE, THEN 
4$ =GO AHEAD AND CHECK THE FEC. 
34(R1).R5 
25$ ;BRANCH IF FEC IS INCORRECT. 
46(R1) “RETURN, 


CONTROL WILL BE PASSED TO CONT. 


THE RESULT IS CORRECT THEN THE FPS IS 
S$ TOO IS ie ot oe a thoes CONTROL 


STCFDS 
TO ERROR FPS. IF THIS MATCHES THEN STCFDS WILL RETURN 
RET - IF THE RESULT OF THE 
THE INCORRECT RESULT IS COMPARED WITH THE 


OTHERWISE THE 


SEQ 0065 


CKFPCAO FP1IF FLTG PNT 
113 


STCDF TEST 


2245 013244 
2246 

2247 013250 
2248 013250 
2249 013252 
2250 

2251 

2252 013254 
2253 013260 
2254 013262 
2255 


2256 
2257 013266 
2258 013266 
2259 013270 
2260 
2261 
2262 013272 
2263 013300 
2264 013304 
2265 013306 
2266 013310 
013316 
2267 013320 
013320 


2273 


, ee 

3595 013324 
13324 

$578 013396 

32 


2281 013344 
2282 013346 
2283 013350 
2284 013354 


016137 
010537 
104053 
000742 
177777 
177777 
104412 


: 


o--— net 
* 
— 
Ww 


2: 


PRT C 


000020 
013310 
000004 


000040 


000034 
000044 


000036 001256 
001254 


177777 )=—177777 


040000 
013342 001236 


140000 
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;RESULT INCORRECT: 
15$: MO R1 


V :SEE IF ERROR WAS ANTICIPATED. 
ADD #20,R2 
MOV WSTCDT,R3 
MOV #4 RO 

16$ CMP (R2)+, (R3)+ 
BNE 17$ ;BRANCH IF NOT ANTICIPATED. 
08 RO, 16$ 


40(R1) ;1F ERROR WAS ANTICIPATED RETURN. 
HERWISE REPORT RESULT INCORRECT HERE. 


ERROR +51 :DATA ERROR 

BR 4$ 

-FPS INCORRECT: 

20$: CMP R4,34(R1) :WAS THE ERROR | ANTICIPATED. 
BNE 21$ :BRANCH IF NOT ANTICIPATED. 

JMP 44(R1) ‘IF IT WAS ANTICIPATED RETURN. 


ie; FPS ERROR WAS NOT ANTICIPATED SO REPORT FPS INCORRECT HERE. 


22$: ERROR +52 sFPS X 
BR 4$ 
“REPORT FEC INCORRECT: 
25$: MOV 36(R1) ,aa#STMP12 
MOV RS, av$TMP11 
26$: ERROR +5 :FEC X 
BR 4$ 
STCDT: =1,-1,-1,-1 
YYYDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 
[SEE IF THE USER HAS EXPRESSED 
: THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
“THE USER TYPED CONTROL G 
RL SE RR ER 
: TEST 14 STCFD WITH ILLEGAL ACCUMULATOR TEST 


: sTHIS TEST STCFD WITH ILLEGAL AC 6. 
** 


III IOI IOSD OIIUIIOIIOIIIDIOUIDO tnt tit 


TST14: SCOPE 
2221: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #40000,R0 :DISSABLE INTERRUPTS. 
LDFPS RO , 
MOV . #2222, a¥#STMP2 
2272: STCFD ACO,AC6 ;THIS TEST INSTRUCTION SHOULD CAUSE AN ERROR. 
STFPS RG :GET EPS. 
STST 


R5 :GET FEC. 
CMP R4,4140000 1S FPS CORRECT? 
BNE 22210 BRANCH IF INCORRECT FPS. 


SEQ 0066 


et 


CKF 
T14 


PCAO FPIIF FLTG PNT PRT C MACRO M1111 
STCFD WITH ILLEGAL ACCUMULATOR TEST 
2285 013356 022705 000002 CMP #225 
2286 013362 001010 BNE 72215 
3087 013364 000415 BR 272ZDONE 
:REPORT FPS INCORRECT AFTER USE 
2290 013366 010437 001242 227210: MOV R4, awSTMP 
2291 013372 012737 140000 001240 MOV #140000, BASINS 
2292 013400 104062 1$: ERROR +62 
2095 013402 000406 BR 72ZDONE 
2295 :REPORT FEC INCORRECT AFTER USE 
2296 013404 010537 001242 - 37715: MoV RS, aS TMP 
2297 013410 012737 000002 001240 MOV #2 rh dla 
2298 013416 104063 $: ERROR +63 
2299 013420 Z72ZDONE : 
013420 104412 RSE TUF 
2300 
2306 
S*TEST 15 CLRD TEST 
ot 
- 
013422 000004 $115: SCOPE 
2307 013424 AABI 
013424 104413 LPERR 
2308 013426 012700 013612 MOV #AABTP1,RO 
01 012701 013602 MOV HAABBF 0 .R1 
2310 013436 012702 000004 MOV #4 ,R2 
2311 013442 012021 1$: MOV (RO) +, (R1)+ 
2312 013444 077202 SOB ,1$ 
2313 013446 012700 013602 MOV 0.RO 
2314 013452 012701 000213 MOV #213,R1 
2315 013456 170101 LDFPS 1 
2316 013460 012737 013466 001236 V #2$, a#STMP2 
3317 013466 170410 2$: CLRD _— (ROD 
2319 013470 170205 STFPS RS 
2320 013472 012702 4 MOV #4 R2 
1 013476 012701 013602 MOV HAABBFO,R1 
2322 013502 005721 3$: TST (R1)+ 
323 013504 001010 BNE 
013 07720 SOB R2,3$ 
2325 013510 022705 000204 CMP #204 ,R5 
2326 013514 001014 BNE AAB 
2327 013516 020027 013602 CMP RO, AAABBF 0 
2328 013522 001020 BNE AAR 
2329 013524 42 BR AABDONE 
2331 ;RESULT NOT 0, REPORT ERROR. 
2332 013526 012737 013602 001240 AAB2: MOV #AABBF 0, a#'$TMPS 
2333 013534 012737 013622 001242 MOV HAABTP2..at$TMPG 
2334 013542 104064 1$: ERROR +64 


C_ 6 
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:1S FEC CORRECT? 
BRANCH IF INCORRECT. 


OF ILLEGAL ACCUMULATOR. 
;BUT FDST ST767 X TO 567 INTO 577 
OF ILLEGAL ACCUMULATOR. 


sFEC<=--2 ST577 xX 
io INITIALIZE THE FPS AND STACK; AND 
:THE DESIRE TO CHANGE THE SOFTWARE 


:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


SF RREARAARRRREREEARAEKREREREEREREREKEEERE EERE AAERERRAEEERERERRE AEH 


:*THIS IS A TEST OF THE CRLF AND CLRD INSTRUCTIONS. 


MmAAAAAARAAAAARAERSAAASARASLASAALARERAAAAASAAAR ERAS ASA RASA SSSA SSS | 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP OUTPUT BUFFER 


SET UP eo OPERAND ADDRESS. 
;SET UP FPS. 

; TEST INSTRUCTION. 

GET FPS. 

SEE IF RESULT CLEAR, 0. 


;BRANCH IF RESULT INCORRECT, NOT 0. 
7 SEE IF FPS IS CORRECT. 
CH IF INC 


SEE IF RO IS CORRECT. 
BRANCH IF RO IS INCORRECT. 


;BAD DATA = 0 X 11+#ZERO ST770 x 


SEQ 0067 


475 





CLRD TEST 


2335 013544 000432 
2336 
2337 
2338 013546 010437 
2339 013552 012737 
2340 013560 104065 
2341 013562 000423 
2342 
2345 
2344 013564 010037 
2345 013570 012737 
2346 013576 104066 
2347 013600 000414 
2348 
2349 


See6 013620 056770 
2360 013622 000000 
2361 013624 000000 
2362 013626 000000 
2363 013630 000000 


104412 


013634 
2372 013636 
013636 
2373 013640 









2376 013654 
2377 

2378 013656 
2379 013660 





2384 013676 
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SEQ 0068 
BR AABDONE 
:REPORT FPS INCORRECT: 
001242 KAB3: MOV RL, aASTMPS 
000204 001240 MOV fobeca Sr STMP3 
1$: ERROR +6 :BAD FPS 
BR arBOONE 
; REPORT RO INCORRECT. 
001242 AABS : RO, a#STMP4 
013602 001240 mov #AABBF 0, a#'$ TMP3 
1$: ERROR +66 
BR AABDONE 
;THIS IS THE TEST DATA BUFFER, OUTPUT DATA BUFFER. 
AABBF 0: 73475 
127347 
56770 
;THIS IS THE DATA USED TO SET UP THE OUTPUT BUFFER. 
AABTP1: 73475 
67707 
127347 
56770 
sTHIS IS THE EXPECTED DATA, RESULT: 
AABTP2: 0 
0 
0 
0 
AABDONE : 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


eS LARS SASAASLALELASASASLSARAARARAASARR LARS SAAR A RARER RASA RAR AA RSS SS OD | 


TEST 16 CLRD WITH ILLEGAL ACCUMULATOR TEST 
THIS IS A TEST OF CLRD WITH ILLEGAL AC7. 
** 


Fee ry re a rr Tay 


18116: SCOPE 


CCB1: 
LPERR SET UP THE LOOP = ERROR ADDRESS. 
MOV #40200,RO0 SET UP THE FPS, NO INTERRUPTS AND FD=1. 


#CCB2,a#$TMP2 
AC7 


















040200 
013654 001236 










: TEST INSTRUCTION. 
:GET FPS. 











RS ; . 
140200 . te HE FPS CORRECT? 
BNE CCB10 BRANCH IF FPS IS INCORRECT. 
000002 CMP #2,R5 31S THE FEC CORRECT? 
BNE CCB15 ;BRANCH IF FEC IS INCORRECT. 










C CBDONE 


mo 
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116 CLRD WITH ILLEGAL ACCUMULATOR TEST SEQ 0069 
2385 
2386 ;REPORT INCORRECT FPS: 
2387 013700 010437 001242 CCB10: MOV R4 ,aA$T 
2388 013704 012737 140200 001240 MOV #140200, aes TMP 
2389 013712 104067 1$: ERROR +67 ;BUT FDST ST 700X TO 607 INTO 677 
Sear 013714 000406 BR CCBDONE 
2392 REPORT INCORRECT FEC: 
2393 013716 010537 001242 CCB15: MOV R5,@4STMP4 . 
239% 013722 012737 000002 001240 MOV #2, QASTMPS 
2395 013730 104070 1$: ERROR +70 sFEC<===2 ST 677 xX 
239% 013732 CCBDONE : 
013732 104412 RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH ~ > setae (HAS 
THE USER TYPED CONTROL G?) 


2405 
2406 sTEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE O WITH ILLEGAL AC7, TEST 
2407  RERERRARRERREERRERERRRERERRERERERAEREREEREREREREERRRREREREEERER 
tSTEST 1? SEE ABOVE COMMENT FOR TEST TITLE 
** 
‘*THIS IS A TEST OF THE SPECIAL 
>*DEST FLOWS USING THE NEGD INST 
:*WITH MODE ZERO AND ILLEGAL 
>*AC7. 
** 
‘ ORCA STAEEEACAAZASEALASEEAEAELAELASAESALASEAEELALALALZACAACEEALAEAALEACCEALAS AS 

013734 000004 $117: SCOPE 
2408 
2409 013736 VVB1: 

013736 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2410 013740 012700 040200 MOV #40200,RO :SET UP THE FPS, FID=1 AND FD=1. 
2411 013744 170100 LDFPS R 
2412 013746 012737 013754 001236 MOV #VVB2, aASIMP2 
2614 013754 170707 VVB2: NEGD AC? :TEST INSTRUCTION. 

2416 013756 170204 STFPS RG :GET FPS. 

a4i7 013760 170305 STST — RS “GET FEC. 

2419 013762 022704 140200 CMP #140200,R4 z1S FPS CORRECT? 
2420 013766 001004 BNE VVB10 :BRANCH IF FPS IS INCORRECT. 
2421 013770 022705 000002 CMP #2,R5 Z1S FEC CORRECT? 

2422 013774 001010 BNE VVB15 ‘BRANCH IF FEC IS INCORRECT. 
shes 013776 000415 BR VVBDONE 

2425 ;REPORT INCORRECT FPS 

2426 014000 612737 140200 001240 VvB10: MOV #140200, aa TMP3 

2427 014006 010437 001242 MOV R4 , a#$TMP4 

2428 014012 104176 1$: ERROR +176 :FPS BAD 

2429 014014 000406 BR VVBDONE 

5431 ;REPORT FEC INCORRECT: 

2432 014016 012737 000002 001240 ‘w315: MOV #2, aASTMP3 

2433 014024 010537 001242 MOV RS. aASTMPS 

2434 014030 104177 1$: ERROR +177 7FEC. BAD 


— 





aa FPIIF FLTG PNT PRT C 
T17 SEE ABOVE COMMENT FOR TEST TITLE 


2435 
2436 014032 
014032 


014034 
7 


2448 014036 
014036 
2449 014040 


2456 014064 
2457 

2458 014066 
2459 014072 
2460 014074 
2461 

2462 014102 
2463 

2464 014104 
2465 014106 
2466 014112 


2467 014114 
2468 014120 


2469 
2470 014122 


2475 014140 
2476 014142 
2477 
478 
2479 014144 


2483 014170 
2484 


104412 


012737 
170700 
170205 


174010 
012701 


000200 
014210 
014220 


000201 


014102 001236 


000200 
014230 


000004 


000204 


014220 001242 
014240 001240 
014230 001244 


MACRO M1111 


VVBDONE : 


RSE TUP 


F_ 6 
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TEST TITLE :NEGF, 


WEA AARRRRRRAAASASAARALASASLASASALESARE RAS E SESE RR RAR ARR SRR SSSR ARES S| 


:*TEST 20 



















SEQ 0070 








3GO_ INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
SVIRTUAL CONSOLE Swi Ici! — (HAS 
; THE USER TYPED CONTROL G?) 







ABSF AND TSTF SOURCE MODE 0 TEST 


SEE ABOVE COMMENT FOR TEST TITLE 


aTHIS IS A TEST THE NEGF, 
;*SOURCE FLOWS. 


ABSF AND TSTF 


THE “¢ 9 INSTRUCTION 


:*1S USED TO TEST MODE 
“* 


° 
5S AAAAAAAAERAAAAERARAAARARAARARARAAREARARARAATRAKRERKARAKARERRARRAAEHE 


1$120: 
DDB1: 


DDB2: 


SRESULT 
DDBS: 


1$: 


SCOPE 


eae © ~~ gl FAILURE : 


#200,R0 

RO 
#DDBTP1,RO 
(RO) ,ACO 
RO 

RO 
#DDBTP2,RO 
(RO) ,ACO 


#201,R0 
R 


#DDB2 , AASTMP2 


ACO 

RS 
#200,RO 
RO 
#DDBBF 0, RO 
ACO, (ROD 
#4,R1 
(RO) + 
DDBS 
R1,1$ 
#204 ,R5 
DDB6 
DDBDONE 


:SET UP ACO. 
sCLEAR THE FPS. 


ety THE — ON ERROR ADDRESS. 
SET FD MODE 


ACO = 0 
LOAD ACO TO BE A FLOATING O. 


i SET ACO= ZERO 
FLOAT 
SET FD MODE. 


TEST INSTRUCTION. 


sGET FPS. 
zSET FD MODE. 


GET THE RESULT OUT OF ACO. 
SEE IF THE RESULT IS CORRECT. 


;BRANCH IF THE RESULT IS INCORRECT. 


31S THE FPS CORRECT? 
{BRANCH IF THE FPS IS INCORRECT. 


#DDBTP2, a#STMP4 ; EXPECT 


#DDBIP3,aaSTMPS ; 
#DDBBF 0; aaw$TMPS :GOT 


+71 


DDBDONE 





DO 
PREV FO IMPURE 





— oo 


aa FPIIF FLTG PNT PRT C MACRO M1111 
T20 SEE ABOVE COMMENT FOR TEST TITLE 


2485 
2486 014172 


G 6 
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REPORT FPS INCORRECT: 
MOV 


012737 000204 001240 ODB6: ae02-8 ars 1 MP3 
2487 014200 010537 001242 V ar$TMP4 
2488 014204 104072 1$: ERROR 55 
te 014206 000420 DDBDONE 
2491 ; THESE ARE TEST DATA TABLES AND AN OUTPUT BUFFER. 
2492 014210 101112 DDBTP1: 101112 
2493 014212 131415 131415 
2494 014214 161710 161710 
2495 014216 111213 111213 
2496 014220 000000 DDBTP2: 0 
2497 014222 000000 0 
2498 014224 0 
Soop 014226 000000 0 
2501 014230 177777 DDBBFO: =1 
2502 014232 177777 “1 
2503 014234 177777 -1 5: 
014 177777 -1 
2505 014240 DDBTP3: 0 
2506 014242 000000 0 
2507 014244 161710 161710 
2508 014246 111213 111213 
2509 
2510 014250 DDBDONE : 
014250 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
3 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
2511 ;THE USER TYPED CONTROL G?). 
2512 TEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 1 TEST 
2513 DD RE RR EERE RCE EERE REE ERE ERR Ee eee 
TEST 21 SEE ABOVE COMMENT FOR TEST TITLE 
;*THIS IS A TEST THE NEGF, ABSF AND TSTF 
;*SOURCE FLOWS. THE NEGD INSTRUCTION 
sels USED TO TEST MODE 1 
SRR AER ERR ERE REE EER ERAEE REE ERRR EER ERE ERE 
2516 014252 000004 tér2 1: SCOPE 
2515 014254 EEBI: 
014254 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2516 014256 012700 014364 MOV MEERTP1,RO SET UP THE DATA BUFFER. 
2517 014262 012701 014414 MOV #EEBBF1,R1 
2518 014266 012702 000004 MOV #4 ,R2 
2519 014272 012021 1$ MOV (RO)+,(R1)+ 
2520 014274 077202 SOB R2,1$ 
2521 014076 012700 000200 Mov = #200,,RO ;SET FD MODE. 
2522 014302 170100 LDFPS RO 
2523 014304 012700 014414 MOV #EEBBFI, ¢3 ;SET UP THE OPERAND ADDRESS. 
2524 014310 012737 014324 001236 MOV MEEB? ,a@ASTMP2 
2525 014316 012737 014424 000004 MOV PEEBION a SPERRVECT 7SET UP VECTOR 4 IN CASE OF ERROR, 
170710 EEB2:  NEGD (RO) :TEST INSTRUCTION. 


2526 014324 
2527 


SEQ Sse e4 


| 
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121 SEE ABCVE COMMENT FOR TEST TITLE SEQ 0072 
2528 014326 170205 STFPS RS :GET FPS. 
2529 014330 012701 014414 MOV #EERBFI,R1 SSEE IF RESULT IS CORRECT. 
2530 014334 012702 000004 MOV #4,R2 
2531 014340 005721 1$: TST (Ri)+ 
2532 014342 001046 BNE FEBS :BRANCH IF NOT CORRECT. 
9238 014344 077203 SOB R2,1$ 
2535 014346 020027 014414 CMP RO, #EERBF 1 ;1S RO CORRECT? 
2536 014352 001055 BNE EEB20 ;BRANCH IF NOT CORRECT. 
2537 014354 022705 000204 CMP #204,R5 :1S THE FPS CORRECT? 
2538 014360 001061 BNE FEB25 “BRANCH IF NOT CORRECT. 
3039 014362 000466 BR EEBDONE 
2541 ; THE SE ARE TEST DATA TABLES AND A BUFFER. 
2542 014364 000177 EERTP1: 177 
2543 014366 167574 167574 
2544 014370 137271 137271 
2545 014372 107675 107675 
2546 014374 000000 FEBTP2: 0 
2547 014376 0 
2548 014400 000000 0 
2549 014402 000000 0 P 
2550 014404 177777 FEBBFO: <1 
2551 014406 177777 of 
2552 014410 177777 of 
2553 014412 177777 -] 
2554 014414 177777 EERBF1: <1 
2555 014416 177777 wh 
2556 014420 177777 ot 
2557 014422 177777 -] 
2558 
2559 :iF A TRAP TO & OCCURS COME HERE: 
2560 014424 011602 EEB10: MOV (SP) .R2 :SEE IF THE TRAP OCCURRED ON THE TEST INSTR. 
2561 014426 020227 014326 CMP R2,MEEB2+2 
2562 014432 001405 | BEQ 1$ :BRANCH IF YES. 
2563 014434 020227 014330 CMP Re -MEEB2 +4 
2564 014440 001402 BEQ :BRANCH IF YES. 
2565 014442 000137 046250 JMP oon SPUR “OTHERWISE GO REPORT A SPURIOUS TRAP TO 4. 
2566 :REPORT A FAILURE IN THE FDST FLOWS RESULTED IN AN ODD ADDRESS TRAP TO 4. 
2567 014446 022626 i$: CMP (SP) +, (SP)+ :RESET THE STACK. 
2568 014450 010237 001236 MOV R2, a#$TMP2 | 
2569 014454 104107 28: ERROR +107 “ODD ADRES 
2570 014456 000430 BR EEBDONE :BUT FDSTX IN ST 771 
2572 : REPORT RESULT INCORRECT 
2573 014460 012737 014374 0012462- EERIS: EBTP2, a#$IMP4 
2574 014666 012737 014364 001240 MOV wEEBIPT. aa$TMPs 
2575 014474 012737 0146414 001244 MOV #EEBBF 1. aa$STMPS 
2576 014502 104073 1$: ERROR +73 :BAD DATA X11#0 ST 312x 
3577 014504 0004615 BR E EBDONE 
2579 :RO INCORRECT: 
2580 014506 012737 014414 001240 §FEB20: MOV #EERBF 1, gaustnps 
2581 014514 010037 001242 MOV RO. as TMP 
2582 014520 104074 1$: ERROR +76 :R0 BADX 


2583 014522 000406 BR £ EBDONE 
2584 ; 


I 6 
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SEE ABOVE COMMENT FOR TEST TITLE SEQ 0073 
2585 ;REPORT FPS ee he 
2586 014524 010537 001240 FEB25: MOV a47$TMP3 
2587 014530 012737 000204 001244 MOV 80a aS TMPS 
Sone 014536 104075 1$: ERROR +75 sFPS Xx 
2590 014540 EEBDONE : 
014540 106412 RSETUP ;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
; VIRTUAL CONSOLE SWITCH REGISTER (HAS 
2591 ;THE USER TYPED CONTROL G?). 
2592 ; TEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 2 TEST 
2593 LLU ROR EERE RRR EERE REE ERE EERE EERE EERE ERE Ee 
*TEST 22 SEE ABOVE COMMENT FOR TEST TITLE 


+e THIS JS A TEST THE NEGF. ABSF AND TSTF 
S*SOURCE FLOWS. THE ABSD INSTRUCTION 
#15 USED 0 TEST MODE 2 


. LCE AE IR TR SS SOR RL A a A 


fe 014542 000004 1$722: SCOPE 
2595 014544 FFI: 
014544 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 

25% 014546 012700 014654 MOV #FFBTP1,RO :SET UP THE DATA BUFFER. 
2597 014552 012701 014704 MOV #FFBBF1_R1 

2598 014556 012702 000004 MOV #4 ,R2 

2599 014562 012021 1$: MOV (RO)+,(R1)+ 

2600 014564 077202 SOB R2,1$ 

2601 014566 012700 000200 MOV #200,RO :SET FD. 

2602 014572 170100 LDFPS RO 

2603 014574 012700 014704 MOV #F FRBF1,RO :SET UP THE OPERAND ADDRESS. 
2604 014600 012737 014614 001236 MOV #FFB2, a#$TMP2 

2605 014606 012737 014714 000004 MOV #°FBI0, a#ERRVECT :SET UP VECTOR 4 IN CASE OF AN ERROR. 
2607 014614 170620 FFB2: ABSD  (RO)+ : TEST INSTRUCTION. 

2609 014616 170205 STFPS RS :GET FPS. 

2610 014620 012701 014704 MOV #FFBBF1,R1 =CHECK RESULT. 

2611 014624 012702 000004 MOV #4 .R2 

2612 014630 005721 1$: TST (Ri)+ 

2613 014632 001046 BNE FFBIS ;BRANCH IF INCORRECT. 

2614 014634 077203 SOB R2,1$ 

2616 014636 020027 014714 CMP RO. AFFRBF1+10  :IS RO CORRECT? 

2617 014642 001055 BNE FFR20 “BRANCH IF INCORRECT. 

2618 014644 022705 000204 CMP #204.R5 *1S THE FPS CORRECT? 

2619 014650 001061 BNE FFB25 ‘BRANCH IF INCORRECT. 

2620 014652 000466 BR F FRDONE 

2622 : THESE ARE TEST DATA TABLES AND DATA BUFFER. 

2623 014654 000177 FFRIP1: 177 

2624 014656 167574 167574 

2625 014660 137271 137271 

2626 014662 107675 107675 


2627 014664 000000 FFBTP2: 0 
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SEE ABOVE COMMENT FOR TEST TITLE SEQ 0074 

2628 014666 000000 0 

2629 014670 000000 0 

2630 014672 000000 0 

2631 014674 177777 FFBBFO: =1 

2632 014676 177777 -1 

2633 014700 177777 -1 

2634 014702 177777 -1 

2625 014704 177777 FFBBF1: =1 

2636 014706 177777 -1 

2637 014710 177777 -1 

oS 014712 177777 -1 

2640 :1F A TRAP TO 4 OCCURS COME HERE. 

2641 014714 011602 FFB10: MOV (SP) ,R2 SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 

2642 014716 020227 014616 CMP R2 AF FB2+2 

2643 014722 001405 BEQ 1$ ;BRANCH IF YES. 

2644 014724 020227 014620 CMP R2,AFFB2+4 

2645 014730 001402 BEQ 1$ ;BRANCH IF YES. 

2646 014732 000137 046250 JMP @4CPSPUR SOTHERWISE GO REPORT SPURIOUS TRAP TO 4. 

2647 ;REPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4. 

2648 014736 022626 1$: CMP (SP) +, (SP)+ 

2649 014740 010237 001236 MOV Re aa$TMP2 

2650 014744 104076 2$: ERROR +7 ‘ ;ODD ADRES 

$03) 014746 000430 BR F FBDONE ;BUT FDSTX IN ST 771 

2653 REPORT RESULT INCORRECT: 

2654 014750 012737 014664 001240 FFBI5: MOV #FFBTP2, aASTMP3 

2655 014756 012737 014654 001242 MOV #FFBTP1,@a#$IMP4 

2656 014764 012737 014704 001244 MOV #F FBBF 1, a#$TMPS 

2657 014772 104077 1$: ERROR +77 BAD DATA X11*90 ST 312x 

ate 4 014774 000415 BR F FBDONE 

2660 REPORT RO INCORRECT: 

2661 014776 012737 014710 001240 FFB20: MOV #FFBBF1+4 ,aaSTMP3 

2662 015004 010037 001242 MOV RO, a#STMPS 

2663 015010 104100 1$: ERROR +100 ;RO BADX 

ae 015012 000406 BR F FBDONE 

2666 REPORT FPS INCORRECT: 

2667 015014 010537 001240 FFB25: MOV R5 ,a#$TMP3 

2668 015020 012737 000204 001244 MOV #204 ,aASTMPS 

544 015026 104101 1$: ERROR +101 iFPS X 

2671 015030 F FBDONE : 

015030 104412 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 

:SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH 3 pian (HAS 
THE USER TYPED CONTROL 

2672 ;TEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 4 TEST. 

2673 LEAR REE EE EEE E REE EEE EKER KREREEREREEREREEAE EERE EE 


s*TEST 23 SEE ABOVE COMMENT FOR TEST TITLE 


:*THIS IS A TEST THE NEGF, ABSF AND TSTF 
s*SOURCE FLOWS. THE ASSD INSTRUCTION 
:*1S USED TO TEST MODE 4 
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123 SEE ABOVE COMMENT FOR TEST TITLE SEQ 0075 


Ete PP PRR RR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR RRR SRE DG 


: 015032 000004 1123: SCOPE 





6 
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T23 SEE ABOVE COMMENT FOR TEST TITLE SEQ 0076 


2676 015034 GGB1: 

015034 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2677 015036 012700 015144 MOV #GGBTP7 ,RO SET UP THE DATA BUFFER. 
2678 015042 012701 015164 MOV #GGBBFO,R1 


2679 015046 012702 000004 MOV M4 Re 
2680 015052 012021 1$: MOV (RO)+, (RID+ 


CKFPCAO FP11F FLTG PNT PRT C 
T23 SEE ABOVE COMMENT FOR TEST TITLE 


2682 015054 
2683 015056 
2684 015062 


2685 015064 
2686 015070 
2687 015076 
2688 
2689 015104 
2690 


& 
oO 
— 
oo 
Ss 
wv 
— 
& 


abheiehabah athababab 
SEWWE NNR 


15220 
3558 015222 
2729 
2730 015226 
2731 015230 
2732 015234 
27335 015236 
2734 
2735 
2736 015240 


2737 015246 
2738 015254 


Or 7608 


012737 
170640 
170205 


000200 
015174 


015104 
015204 


015164 
000204 


015106 
015110 
046250 


001236 


MACRO _M1111 


001236 
000004 


; THESE ARE TEST 
z ivf 


M 6 
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R2,1$ 
#200,R0 sSET FD. 
#GGBBF 1,RO :SET UP THE OPERAND ADDRESS. 
#GGB2 , a#$TMP2 
#GGB10,a#ERRVECT :SET UP VECTOR 4 IN CASE OF AN ERROR. 
sTEST INSTRUCTION. 
:GET FPS. 
=CHECK RESULT. 
:BRANCH IF INCORRECT. 


RO, #GGBBF 0 :1S RO CORRECT? 

GGB20 “BRANCH IF INCORRECT. 
#204,R5 ‘IS THE FPS CORRECT? 
GGB25 “BRANCH IF INCORRECT. 
GGBDONE 


DATA TABLES AND DATA BUFFER, 


GGBTP1 


GGBTP2: 


GGBBF 0: 


occuns COME HERE . 
Ree 4GGB2+2 
Ree AGGB2+4 
1$ BRANCH IF YES. 
a4 CPSPUR ; OTHERWISE GO REPORT SPURIOUS TRAP TO 4. 
SP) iis ry RESULTED IN A TRAP TO 4. 

+ 


R2 TMP 
+102 
GGBDONE 


;BRANCH IF YES. 


:ODD ADRES 
;BUT FDSTX IN ST 771 


RESULT INCORRECT: 

MOV #GGBTIP2, a#$TMP3 
MOV *CCBIPT. a4$TMP4 
MOV #GGBBF 0; a#'$TMPS 


SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 


SEQ 0077 





acta FP11F FLTG PNT PRT C MACRO M1 
123 SEE ABOVE COMMENT FOR TEST TITLE 


2739 015262 104103 
seat 015264 000415 


2742 
2743 015266 


012737 015164 001240 
2744 015274 010037 001242 
2745 015300 104104 


2746 015302 000406 
2747 


2748 

2749 015304 010537 001240 

2750 015310 012737 000204 001244 
$f) 015316 104105 


2753 015320 
015320 


2754 
2755 


015322 000004 
2757 IEE Sy 


015324 
2758 015326 012700 015434 
2759 015332 012701 015464 
000010 


2762 0 

2763 015346 012700 000200 

2764 015352 170100 

2765 015354 012700 015474 

2766 015360 012737 015374 001236 
cree 015366 012737 015504 000004 
2769 015374 170630 

2770 

- 2771 015376 170205 

2772 015400 012701 015464 

2773 0154 000004 


2777 015416 020027 015476 
2778 0 001061 
2779 015424 022705 000204 
2780 015430 001065 
2781 015432 000472 


N 6 
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1$: ERROR +103 :BAD DATA X11*0 ST 312K 
‘BR GGBDONE 
REPORT RO INCORRECT: 
GGB20: #GGBBF 01, a#$TMP3 
mov RO, a#$T 
1$: ERROR +104 ;RO BADX 
BR GGBDONE 
: REPORT EPs INCORRECT: 
GGB25: R5, a#STMP3 
MOV #204, aS TMPS 
1$: ERROR +105 sFPS x 
GGBDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH sgh (HAS 
; THE USER TYPED CONTROL G?) 

;TEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 3 TEST 


—MmARAAASAAAAALA£LA£ £222 2S SARA SAAS ALES AAAS AAR EARLE SRSA RASA LASS SO 


: TEST 24 SEE ABOVE COMMENT FOR TEST TITLE 


THIS re A TEST THE NEGF, " ABSF AND TSTF 
:*SOURCE FLOWS. THE ABSD INSTRUCTION 
2*1S USED TO TEST MODE 3 


Ss eaceenenecececqqnenseercenanesreeesenceeteeqeneesstoeoncceceees 


TST24: SCOPE 


HHB1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #HHBTP1,RO :SET UP THE DATA BUFFER. 
MOV #HHBBF 0.1 
MOV #10,R2 
1$ MOV (ROS +, (R1)+ 
SOB R2,1$ 
MOV #200,RO :SET FD. 
LDFPS RO 
MOV WHERE) RO ;SET UP THE OPERAND ADDRESS. 
MOV #HHB2 , aS 


MOV #HHB10, QNERRVECT :SET UP VECTOR 4 IN CASE OF AN ERROR. 
HHB2:  ABSD a(RO)+ TEST INSTRUCTION. 


STFPS RS :GET FPS. 
V #HHBBF 0,R1 [CHECK RESULT. 

MOV #4,R2 

1$ TST (Ri)+ 
BNE HHB15 :BRANCK IF INCORRECT. 
SOB 2,1$ 
CMP RO.#HHBBF1+2 :1S RO CORRECT? 
BNE HHB20 “BRANCH IF INCORRECT. 
CMP #204 ,R5 ‘1S THE FPS CORRECT? 
BNE § “BRANCH IF INCORRECT. 


SEQ 0078 


8 
CKFPCAO FPT1F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 19-2 a) 
T24 SEE ABOVE COMMENT FOR TEST TITLE qT 


2782 

2785 

2784 015434 

2785 015436 

2786 015440 

2787 918402 177777 
015450 7 

2788 015454 000000 000000 000000 
015462 

2789 015464 

790 015466 


; THESE ARE_TEST DATA TABLES AND DATA BUFFER. 
HHBTP1: 177 


IF A TRAP TO 4 OCCURS COME HERE. 
HHB10: MOV (SP) ,R2 sSEE IF THE TRAP OCCURRED ON THE TEST JNSTRUCTION. 
015376 R2,AHHB2+2 
1$ ;BRANCH IF YES. 


015400 st MHHB2 +4 
pe a IF 


YES 
804 015522 000137 046250 JMP cP SPUR THERWISE GO REPORT SPURIOUS TRAP TO 4. 
5 ‘ FLOW FAILURE RESULTED IN A TRAP TO 4. 
806 015526 1$: CMP (SP) +, (SP)+ 
001236 R2, aA$TMP2 
: +106 ;ODD ADRES 
HHBDONE ;BUT FDSTX IN ST 771 


015454 
} mov 


001244 MOV 5 
ERROR ;BAD DATA X11*0 ST 3127 
BR HHBDONE 


; ~# INCORRECT: 
015476 HHB20 : ty AT aati 


001242 
ERROR an :RO INCORRECT. 


BR HHBDONE 
: FPS INCORRECT : 
001240 HHB25: MOV 5. avSTMP3 
000204 MOV n208, ar$TMPS 
$ 015616 : ERROR +1 sFPSX 


015620 : 
015620 _RSETUP 3;GO INITIALIZE THE FPS AND STACK; AND 
[SEE IF THE USER HAS EXPRESSED 
7; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRT UAL CONSOLE aw Bb REGISTER (HAS 
THE USER TYPED CONTROL G?). 
sTEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 5 TEST 


+ TUTTE TTTOTTTET TITTLE TITLE TITTLE TTT TTT TTT ake 


S*TEST 25 SEE ABOVE COMMENT FOR TEST TITLE 











re FPIIF FLTG PNT PRT C 


SEE ABOVE COMMENT FOR TEST TITLE 


2844 015674 
2846 015676 


228 015732 


sa8 
2859 015734 
860 


6 
2877 016004 
2878 016006 


012737 
170750 
170205 


177777 


011602 
020227 


015764 
000004 


015774 
000204 


015676 


C 
MACRO M1111 24-SEP-79 15:03 PAGE 19-3 Cl 


001236 
000004 


177777 


SEQ 0080 T 


8 
;*THIS ¥ A TEST THE NEGF, ABSF AND TSTF 
>*SOURCE FLOWS. THE NEGD INSTRUCTION 
:*1S USED TO TEST MODE 5 


'MARAAAAAARAAALALALASLALAAAALASALASESAARRAASESAR RARER RRA SRR R SAAD SS 


18125: SCOPE 
IIB1: 


LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #1IBTP1,RO :SET UP THE DATA BUFFER. 
MOV #1 I1BBFO.R1 
MOV #10,R2 
1$: MOV (ROS +, (R1)+ 
SOB R2,1$ 
MOV #200,RO :SET FD. 
LDF PS RO 


#1 IBBF1+2, Stho> SET UP THE OPERAND ADDRESS. 


MOV #11B2,a#$? 
MOV #11B10,a@#ERRVECT :SET UP VECTOR 4 IN CASE OF AN ERROR. 
11B2: NEGD  a@-(RO) : TEST INSTRUCTION. 
STFPS RS :GET FPS. 
MOV #1 IBBFO,R1 ?CHECK RESULT. 
MOV #4 R2 
1$ TST (Ri)+ 
BNE 11B15 ;BRANCH IF INCORRECT. 
S0B R2,1$ 
CMP RO. #1 IBBF 1 :1S RO CORRECT? 
BNE 11820 ‘BRANCH IF INCORRECT. 
CMF #204 ,R5 ‘IS THE FPS CORRECT? 
BNE 11B25 ‘BRANCH IF INCORRECT. 
BR 1 IBDONE 
: THESE ARE TEST DATA TABLES AND DATA BUFFER. 
[IBTP1: 176 
177074 
127374 
157677, | IBBFO,-1,-1,-1 
IIBTP2: 0 
0 
0 
0 
| IBBFO: =" 
ot 
-1 
]IBBF1: -1 


;1F A TRAP TO 4 OCCURS COME KERE. 
11B10: MOV (SP) ,R2 SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION, 
CMP R2,A1IB2+2 


D | 
eae FPI1F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 19-4 


SEE ABOVE COMMENT FOR TEST TITLE SEQ 0081 
2879 016012 001405 BEQ 1$ ;BRANCH IF YES. 
2880 016014 020227 015700 CMP Re, MI IB2+4 
2881 016020 001402 BEQ i$ 3 ete IF YES. 
2882 016022 000137 046250 JMP aacr SPUR THERWISE GO “ay _— TRAP TO 4. 
2883 ;REPORT AN FDST FLOW ity RESULTED IN A TRAP T 
016026 022626 1$: CMP (SP)+, (SP) 
2885 016030 010237 001236 MOV Re, TMP2 
016034 104113 2s: ERROR +113 ;0DD ADRES 
2887 016036 000430 BR 1 IBDONE ;BUT FDOSTX IN ST 771 
;REPORT RESULT INCORRECT: 
2890 016040 012737 015754 001240 I1B815: MOV #IIBTP2 ,@A#STMP3 
160466 012737 015734 001242 MOV #IIBTP1, @4$TMP4 
2892 016054 012737 015764 001244 MOV #1 IBBFO. a#$TMP5 
2893 016062 104114 1$: ERROR +114 ;BAD DATA X11*0 ST 3127 
soe 016064 000415 BR 1 IBDONE 
2896 ;REPORT ay INCORRECT: 
2897 01 012737 015774 001240 11820: #1 IBBF 1, aa4STMF-3 
2898 016074 010037 001242 RO, aASTMP4 
2899 016100 104115 1$: ERROR +115 ;RO BADX 
2900 016102 000406 BR 1 IBDONE 
2901 ;REPORT FPS INCORRECT: 
2902 016104 010537 001240 ~~: 11825: MOV RS, @4$TMP3 
2903 016110 012737 000204 001244 MOV #204, aASTMPS 
3a: 016116 104116 1$: ERROR +116 sFPSX 
2906 016120 I IBDONE : 
016120 104412 RSETUP 3;GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
2907 ; THE USER TYPED CONTROL G?). 
2908 ;TEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 6 TEST 
2909 LAR R REE ERRERERREREEREEERE RE RERERREEREREEEEEEEE e 
:*TEST 26 SEE ABOVE COMMENT FOR TEST TITLE 
THIS IS A TEST THE NEGF, ABSF AND TSTF 
+ *SOURC CE FLOWS. THE ABSD INSTRUCTION 
:sIS USED TO TEST MODE 6 
RRR RRR RRR REE REE ERR EERE EERE RARER EEERE RRR RE 

016122 000004 18126: SCOPE 
2910 
2911 016124 JJB1: 

016124 104413 . LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
2912 016126 012700 016236 MOV #JJBTP1,RO ;SET UP THE DATA BUFFER. 
2913 016132 012701 016260 MOV MJ JBBFO,R1 
2914 016136 012702 000004 MOV #4 Re 
2915 016142 012021 1$: MOV (RO)+,(R1)+ 
2916 016144 077202 $08 R2,1$ 
2917 016146 012700 000200 MOV #200,RO :SET FD. 

2918 016152 170100 LDFPS. RO 

2919 016154 012700 016251 MOV ar get RO ;SET UP THE OPERAND ADDRESS. 

2920 016160 012737 016174 001236 MOV #JJB2 , @ASTMP 

2921 016166 012737 016300 000004 MOV 7) )Bi0°a @#ERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 


ana 


CKFPCAO FP11F FLTG PNT PRT C 
T26 SEE ABOVE COMMENT FOR TEST TITLE 


2 
$36? 016174 


2952 016274 
343, 016276 


2955 

2956 016300 
2957 016302 
2958 016306 
2959 016310 
2960 016314 
2961 016316 
2962 


2963 016322 
2964 016324 
2965 016330 
2966 016332 


2978 016374 


170660 
170205 


E 
24-SEP=79 15:03 PAGE 19-5 


MACRO M1111 
SEQ 0082 
000007 JJB2:  ABSD  7(RO) : TEST INSTRUCTION. 
STFPS RS :GET FPS. 
016260 MOV #JJBBFO,R1 : CHECK RESULT. 
000004 MOV #4 R2 
1$: TST (Ri}¢ 
BNE JJB15 :BRANCH IF INCORRECT. 
SOB ~CsséR2,, 1$ 
016251 CMP RO. AJJBBFO=7 =: 1S RO CORRECT? 
BNE B15 “BRANCH IF INCORRECT. 
000204 CMP eit R5 71S THE FPS CORRECT? 
BNE JJB20 [BRANCH IF INCORRECT. 
: BR JJBDONE 
: THESE ARE TEST DATA TABLES AND DATA BUFFER. 
‘JBTP1: 177 
161524 
131273 
000000 107174, 
JIBTP2: 0 
0 
0 
0 
JJBBFO: =] 
at 
@1 
JJBBF 1: “i 
of 
ot 
:1F A TRAP TO 4 OCCURS COME HERE. 
5JB10: MOV (SP) ,R2 ZSEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
016176 CMP R2,#IJB2+2 
BEQ 1$ :BRANCH IF YES. 
016200 CMP R2,#JJB2+4 
BEQ 1$ :BRANCH IF YES. 
046250 JMP a*CPSPUR TOTHERWISE GO REPORT SPURIOUS TRAP TC 4. 
REPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4. 
(SP)+, (SP) + 
001236 MOV 2, a#$TMP2 
2$: ERROR +117 :ODD ADRES 
BR JJBDONE ‘BUT FDSTX IN ST 771 
;REPORT RESULT INCORRECT : 
016250 001240 JJB15: MOV JJBTP2, a&$TMP3 
016236 001242 MOV a IBIP IT. av$TMP4 
016260 001244 MOV #J JBBF 0. aS TMPS 
1$: ERROR +120 :BAD DATA X11*0 ST 3127 
BR JJBDONE 
;REPORT RO INCORRECT: 
016251 001260 JJB20: MOV #JJBBF 0-7 aa#$TMP3 
001242 MOV RO, a#STMP4 
1$: ERROR +124 :RO BADX 


a ae 


Nata FPIIF FLTG PNT PRT ( 


F 
MACRO M1111 24=SEP=79 15:03 PAGE 19-6 


SEE ABOVE COMMENT FOR TEST TITLE 


2979 016376 

2980 

2981 016400 

2982 016404 

2983 016412 

2984 016414 
016414 


2985 
2986 


» 016416 
2988 016420 
016420 

2989 016422 
2990 016426 


ss seeesyesy 


= 
SO ONOWFSWN-oO 


000406 BR J JBDONE 
;REPORT FPS eT hal 
010537 001240 JB25: MOV aeSTMP3 
012737 000204 001244 MOV rete: aeSTMPS 
104122 1$: ERROR +1 
JJBDONE : 
104412 TuP 


3 FPSX 


G0 INITIALIZE THE FPS AND STACK; AND 


SO E 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


TEST TITLE:NEGF, ABSF AND TSTF SOURCE MODE 7 TEST 


LLAMA RARARRREAERAKRAARRAAERERAAEERAERRARRARARARERAARRERERERAERARARR EH 


S*TEST 27 
:*THIS 1S A TEST THE NEGF, ABSF 


SEE ABOVE COMMENT FOR TEST TITLE 


AND TSTF 


*SOURCE FLOWS. THE ABSD INSTRUCTION 


:eIS USED TO TEST MODE 6 


mA eRe eee RRR RRR RR RRR RR RR RRR RARER RRR ARR RRS RRR RASA SSS DD SO | 


SET UP IS LOOP ON ERROR ADDRESS. 


SET UP THE DATA BUFFER. 


;SET UP THE OPERAND ADDRESS. 


;SET UP VECTOR 4 IN CASE OF AN ERROR. 


S. 
CHECK RESULT. 


;BRANCH IF INCORRECT. 


BRANCH IF INCORRECT. 
71S THE FPS CORRECT? 
SBRANCH IF INCORRECT. 


000004 18127: SCOPE 
KKB1: 
104413 LPERR 
012700 016532 MOV #KKBTP1,RO 
012701 016562 MOV AKKBBFO.R1 
012702 000010 MOV #10,R2 
012021 1$: MOV (RO) +,(R1)+ 
077202 SOB R2,1$ 
012700 000200 MOV #200,RO :SET FD. 
170100 LDFPS RO 
012700 016563 MOV AKKBBF 1-7,RO 
012737 016470 001236 MOV #KKB2, aS TMP 
012737 016602 000004 MOV #KKB10, SFERAVECT 
170770 000007 KKB2: NEGD a7(RO) ZTEST INSTRUCTION. 
170205 STFPS RS :GET FP 
012701 016562 MOV #KKBBFO,R1 
012702 000004 MOV 4.R2 
005721 1$: TST (R1)+ 
001052 BNE KKB15 
077203 _—- SOB $ 
27 016563 CMP RO.AKKBBF1~7 1S RO CORRECT? 

001061 BNE KKB20 
022705 000204 CMP #204 ,R5 
001056 BNE KKB20 

BR KKBDONE 

Bs 3 ha TEST DATA TABLES AND DATA BUFFER. 

000177 KKBIPi: 177 
167574 167576 
137271 137271 


107675, KKABFO,-1,-1.-1 
KKBTP2: 0 
0 


107675 016366 177777 


SEQ 0083 


an 


G 
CKFPCAG FPIIF FLTG PNT PRT C MACRO M1111) 24=SEP=79 15:03 PAGE 19-7 
127 SEE ABOVE COMMENT FOR TEST TITLE 


3021 016556 


0 
KKBBFO: 


KKBRF 1: 
3029 016576 177777 





——“~ 


H 
CKEPCAO FP11F FLTG PNT PRT C MACRO M1111. 24-SEP-79 15:03 PAGE 20 


SEE ABOVE COMMENT FOR TEST TITLE SEQ 0085 
3031 016600 177777 -1 
3032 
3033 IF A TRAP TO 4 OCCURS COME HERE. 
3034 016602 011602 KKB10: MOV (SP) ,R2 ;SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
3035 016606 020227 016472 CMP Re AKKB2+2 
3036 016610 001405 BEQ :BRANCH IF YES. 
3037 016612 020227 016474 CMP a2. AKKB2 +4 
3038 016616 001402 BEQ - 1$ ;BRANCH IF YES. 
3039 0716620 000137 046250 JMP @4CPSPUR s OTHERWISE GO REPORT SPURIOUS TRAP TO 4. 
3040 sREPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4. 
3041 016624 022626 i$: CMP (SP) +, (SP)+ 
3042 016626 010237 001236 MOV R2, a#$TMP2 
3043 016632 104123 2$: ERROR +123 :O0DD ADRES 
3044 016634 000430 BR KKBDONE “BUT FDSTX IN ST 771 

;REPORT RESULT gooey 

3047 016636 012737 016552 001240 KkB15: MOV KBTP2, a#$TMP3 
3048 016644 012737 016532 001242 MOV ORABIP! OFsTPPS 
3049 016652 012737 016562 001244 MOV #KKBBF 0. a#$TMPS 

01 104124 1$: ERROR +124 :BAD DATA X11*0 ST 3127 
3051 016662 000415 BR KKBDONE 
3053 ;REPORT RO INCORRECT: 
3054 016664 012737 016563 601240 KKB20: MOV AKKBBF 1-7, a#STMP3 
3055 016672 010037 001242 MOV RO, a#STMP4 
3056 016676 104125 1$: ERROR +125 ;RO BADX 
3057 016700 000406 BR KKBDONE 
3058 sREPORT FPS INCORRECT: 
3059 016702 010537 001240 KKB25: MOV RS, aA$TMP3 
3060 016706 012737 000204 001244 MOV #204, aASTMPS 
aod 016714 104126 1$: ERROR +126 sFPSX 
3063 016716 KKBDONE : 

016716 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
: VIRTUAL CONSOLE SWITCH > eh (HAS 
THE USER TYPED CONTROL G?) 
:TEST 7ITLE:NEGF, ABSF AND TSTF SOURCE MODE 6, GR7 


3065 ay LAR RSSAASASASLASASALASEASASLESASESARRRR RRA AR RRR ASAR ARR RRR RASA SSS Of 


:#TEST 30 SEE ABOVE COMMENT FOR TEST TITLE 
< STHIS IS A TEST THE NEGF, ABSF AND TSTF 
>*SOURCE FLOWS. THE NEGD INSTRUCTION 

isIs USED TO TEST MODE 6 


° 
—mAADAAAAASZELASASZASAALASRRRARASRRSRRR RR RR RARR RRR RRR REAR RR RRR RSS ES Bs 


016720 000004 78130: SCOPE 
3066 016722 LLB1: 

016722 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
3067 016724 012700 017022 MOV #LLBTP1,RO 7SET UP THE DATA BUFFER, 
3068 016730 012701 017042 MOV #i LBBFO, R1 
3069 016734 012702 000004 MOV #4,R2O 
3070 016740 012021 1$: MOV (R0)s. (R1)+ 
3071 016742 077202 SOB 


1$ 
3072 016744 012700 000200 MOV #560 RO :SET FD. 
3073 016750 1701900 LDFPS RO 















I 
i FPIIF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 20-1 


SEE ABOVE COMMENT FOR TEST TITLE SEQ 0686 


3074 016752 012737 016766 001236 MOV #LLB2, a#STMP2 : 

3075 016760 012737 017062 000004 MOV #LLB10,a#ERRVECT :SET UP VECTOR 4 IN CASE OF AN ERROR. 
3077 016766 170767 000050 LLB2: NEGD  LLBBFO : TEST INSTRUCTION. 
3079 016772 170205 STFPS RS :GET FPS. 

3080 016774 012701 017042 MOV #LLBBFO,R1 SCHECK RESULT. 
3081 017000 012702 000004 4,R2 

3082 017006 005721 1$: TST (RI)+ 

3083 017006 001043 BNE LLB15 :BRANCH IF INCORRECT. 
3084 017010 077203 SOB R2,1$ 

3085 017012 022705 000204 CMP #204 ,R5 :1S THE FPS CORRECT? 
3086 017016 001052 BNE LLB25 “BRANCH IF INCORRECT. 
3087 017020 0004657 BR LLBDONE 

3089 : THESE ARE TEST DATA TABLES AND DATA BUFFER. 

3090 017022 000127 [LBTP1: 127 

3091 017024 137475 137675 


147372 
117057 
3094 017032 000000 LLBTP2: . 
0 


N 
oO 
= 
SN 
® 
oO 


309 0 
3098 017042 177777 LLBBFO: =1 


3100 017046 177777 -1 
3101 017050 177777 -1 
3102 017052 177777 LLBBF1: =1 








3104 017056 177777 at 
3105 017060 177777 of 

:1F A TRAP TO 4 OCCURS COME HERE. 

3108 017062 011602 {LB10: MOV (SP) ,R2 [SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
3109 017064 020227° 016770 CMP R2,ALLB2+2 

3110 017070 001405 BEQ 1$ :BRANCH IF YES. 

3111 017072 020227 016772 CMP R2,ALLB2+4 

3112 017076 001402 BEQ 1$ :BRANCH IF YES. 

3113 017100 000137 046250 JMP a4#CPSPUR ‘OTHERWISE GO REPORT SPURIOUS TRAP TO 4. 
3114 sREPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4. 

3115 017104 022626 i$: CMP (SP) +, (SP)+ 

3116 017106 010237 001236 MOV R2, a#$TMP2 

3117 017112 104127 2s: ERROR +127 s0DD ADRES 

3118 017114 000421 BR LLBDONE ‘BUT FDSTX IN ST 771 

3120 :REPORT RESULT INCORRECT: 

3121 017116 012737 017032 001240 {[LB15: MOV ALLBTP2, aS TMP3 

3122 017124 012737 017022 001242 MOV #LLBTP1 .a#$TMP4 

3123 017132 012737 017042 001244 MOV ALLBBF 0. aaSTMPS 

3124 017140 104130 1$: ERROR +130 :BAD DATA X11*0 ST 3127 

3125 017142 000406 BR LLBDONE 

3126 ;REPORT FPS INCORRECT: 

3127 017144 010537 001240 iLB25: MOV R5, aASTMP3 

3128 017150 012737 0002046 001244 MOV #204, a#STMPS 

3129 017156 104131 1$: ERROR +131 FPS 


— FPI11F FLTG PNT PRT 


3131 017160 
017160 


3132 
3133 


017162 
3134 
3135 017164 
017164 
3136 017166 


3144 017222 
3145 

3146 017230 
3147 

3148 017234 
3149 017236 
3150 017242 
3151 017246 
3152 017250 
3153 017252 
3154 017254 
3155 017260 
3156 017262 


104412 


012737 
170677 
170205 


177777 


017264 
017314 
000010 
000200 


017230 
017334 


000070 


017314 
000004 


000204 


017314 
177777 


TIT 


C MACRO M1111 
SEE ABOVE COMMENT FOR TEST LE 


001236 
000004 


LLBDONE : 


RSE TUP 


sTEST TITLE:NEGF, 


J 
24=SEP=79 15:03 PAGE 20-2 


3GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH i (HAS 
;THE USER TYPED CONTROL G?) 

ABSF AND TSTF SOURCE MODE 7, GR? 


SROKA AREER REREEAEAAEERAEAEERAAEEERRARERERRE EE 


: TEST 31 


THIS IS A TEST THE NEGF, 
;*SOURCE FLOWS. 
:*1S USED TO TEST MODE 
® 


. 
° 


SEE ABOVE COMMENT FOR TEST TITLE 


ABSF AND TSTF 
THE - INSTRUCTION 


FF EAA AERAAAAARAEERARAAARERARARRERERARERARAERRRRAERRRAARERERARRRRER 


TST31: 
MMB 1: 


1$: 


SCOPE 


LPERR 


SET UP THE LOOP ON ERROR ADDRESS. 
3SET UP THE DATA BUFFER. 


(RO) +, (R1)+ 
R2,1$ 
#200,R0 

RO 
HMB? , AAS TMP2 


sSET FD. 


#MMB10,@MERRVECT ;SET UP VECTOR 4 IN CASE OF AN ERROR. 


aMMBBF 1 s TEST INSTRUCTION. 

RS :GET FPS. 

#MMBBFO,R1 =CHECK RESULT. 

#4,R2 

(R1)+ 

518 :BRANCH IF INCORRECT. 

#204,R5 z1S THE FPS CORRECT? 
25 “BRANCH IF INCORRECT. 

MMBDONE 


THESE ARE_TEST DATA TABLES AND DATA BUFFER. 
MMBTP1: 137 


MMBTP2: 


MMBBF 0 : 


MMBBF 1 : 


045607 


101230 
45607 ,.MMBBFO,-1,-1,-1 





SEQ 0087 





K 
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Sa FPI11F FLTG PNT PRT C MACRO M1111 


SEE ABOVE COMMENT FOR TEST TITLE SEQ 0088 
3173 017330 177777 -1 
aoe 017332 177777 -1 
3176 sI1F A TRAP T0 4 ee COME HERE. 
3177 017334 1160 MB 1 QO: MOV (SP) ,R2 ;SEE IF THE TRAP OCCURRED ON THE TEST INSTRUCTION. 
3178 017336 020227 017232 CMP R2, AMMB2 +2 
3179 017342 001405 BEQ 1$ ;BRANCH IF YES. 
3180 017344 020227 017234 CMP ors 
3181 017350 001402 BEQ 1$ ;BRANCH IF YES. 
3 0173 137 046250 JMP a4CPSPUR sOTHERWISE GO REPORT SPURIOUS TRAP 70 4. 
3183 REPORT AN FDST FLOW FAILURE RESULTED IN A TRAP TO 4. 
3184 017356 022626 (SP)+, (SP)+ 
3185 017360 010237 001236 MOV R2,a#$TMP2 
3186 017364 104132 2$: ERROR +132 ZODD ADRES 
tes 017366 000421 BR MMBDONE ;BUT FDSTX IN ST 771 
3189 REPORT — gon 
3190 017370 012737 017304 001240 TP2 , a#$STMP3 
3191 017376 012737 017264 001242 mov #MMBTP 1, a#STMPS 
3192 0174046 012737 017314 001244 MOV AMMBBF 0, aS TMPS 
he, 017412 104133 1$ ERROR +13 ;BAD DATA X11*0 ST 3127 
3194 017414 06 BR MMBDONE 
3195 sREPORT FPS INCORRECT: 
3196 017416 010537 001240 MMB25: MOV RS ,a#$STMPS 
3197 017422 012737 000204 001244 MOV #204 ,@4STMPS 
tbe 017430 104134 i$ ERROR +134 sFPSX 
3200 017432 MMBDONE : 
017432 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
*SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
: THE USER TYPED CONTROL G?). 
3207 IIIS IUISIIDICIUICIIIOISIOIOIOIOIIOIOIOIOIOITOIOIOTIOISIOIOI TOIT ITO ITI ITO TIO 
:*TEST 32 SPECIAL DEST, MODE 0, TEST 
** 
s*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 0 USING THE NEGD INSTR. 
** 
DOIG IO IESE IISIIIDIISIOIOISIOIOIOIIUIIIDIUIDIOUIIOIOIIUIIOIISISIEIITIOIDDDI I I oiiontt 
017434 000004 TST32: SCOPE 
3209 017436 NNB1: 
01742 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
3210 017440 012700 000200 MOV #200,R0 ;SET FD. 
3211 017444 170100 LDFPS 
3212 017446 012700 017534 MOV #NNBTP1,RO ;SET UP ACO. 
3213 017452 172410 LDD (RO) ACO 
3014 017454 012737 017462 001236 MOV #NNB2 , aS TMP2 
S19 017462 170700 NNB2: NEGD ACO ZTEST INSTRUCTION. 
3218 017464 170205 STFPS RS :GET FPS. 
3219 017466 012700 000200 MOV #200,R0 sSET FD. 
3220 017472 170100 LDFPS R 
3221 017474 012700 017554 MOV ANNBBF 0, RO :GET THE RESULT. 
3222 017500 174010 STD ACO, (RO) 


CKFPCAO FP11F FLTG PNT PRT C 
T32 SPECIAL DEST, MODE 0, 


3223 017502 
3224 017506 


3245 017562 
3246 


3248 017564 
3249 017572 
3250 017600 
3251 017606 
3252 017610 
3253 017612 
3254 


3255 
3256 017614 
3257 017614 
3258 017616 
3259 


3260 
3261 017620 
3262 017624 
3263 017632 
3264 


3265 017634 
017634 


3266 


017636 
3267 


012700 
012701 
012702 


104136 
000406 


010537 
012737 
104137 


104412 


000004 


017554 
017544 
000004 


000210 


017554 
017544 
017534 


001242 
000210 


MACRO M1111 
TEST 


017554 


001240 


L 
24=SEP=79 15:03 PAGE 20-4 
MOV ANNBAF 0 ,RO 
MOV #NNBTP2.R1 
#4 ,R2 
(RO) +, (R1)+ 
NNB10 
R2,1$ 
CMP #210,R5 
BNE NNB15 
BR NNBDONE 


71S THE RESULT CORRECT? 


;BRANCH IF INCORRECT. 


31S THE FPS CORRECT? 
;BRANCH IF INCORRECT. 


; THESE ARE_DATA TABLES AND A DATA BUFFER. 
NNBTP1: 013572 


0 
NNBTP2: 


NNBBF 0 : 


zREPORT ~~ Saad INCORRECT: 
NNB10: A#NNBBF 


CMP . 
BNE NNB11 
1$ ERROR +135 
NNBDONE 


;REPORT RESULT INCORRECT: 


3E10*200xX ST 336 


;BAD DATA NEGF 


sFPSX 


G0 INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 

[THE DESIRE TO CHANGE THE SOFTWARE 
SVIRTUAL CONSOLE SWITCH — (HAS 
3; THE USER TYPED CONTROL G?) 


POTTTT TTT TITTLE TTT TTETTTT TIT TT TTT TTT TT TTT TTT 


1$: ERROR +136 
BR NNBDONE 
:REPORT FPS INCORRECT: 
NNB15: MOV RS, a#$TMP4 
MOV #210, a4STMP3 
1$: ERROR +137 
NNBDONE : 
RSETUP 
: FEST 33 


SPECIAL DEST, MODE 1, TEST 


aTHIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 


;*MODE 1 USING THE NEGD INSTR. 
oe 


WEARS AAAASAASALALSALASZAASASLAS ESAS RRS AR ARERR RSE R RRR RRR SRR ARS SSS | 


1S133: SCOPE 


SEQ 0089 


CKFPCAO FP11F FLTG PNT PRT C 
133 SPECIAL DEST, MODE 1, 


3268 017640 
017640 
3269 017642 
3270 017646 
3271 017652 
3272 017656 
3273 017660 
3274 017662 
3275 017666 
3276 017672 
3277 017700 

170101 

170710 


017752 
017762 


017752 
017762 
000004 


017752 
000210 
3292 017750 
3293 


3294 
3295 017752 


3302 017770 
3303 


017752 
017762 


3304 
tron 017772 
306 020000 


017752 
001242 


3314 020026 
3315 
3316 
3317 020030 
3318 020036 
3319 020042 
320 


3 
3321 020044 
020044 


MACRO M1111 
TEST 


0081 : 


M 
24=SEP=79 15:03 PAGE 20-5 


#OOBTP1 ,R1 
#O0BTP2,RO 


#4 R2 
(RO) +, (R1)+ 
R2,1$ 


:SET UP THE DATA BUFFER 


#O0BTP1,RO 
#100000. (RO) 
#00B2 , aS TMP2 


#200,R1 
R1 


(RO) 

R5 

#OOBTP1 ,R1 
#OOBTP2,R2 


#4 -R3 
(R1)+,(R2)+ 
00810 


MAKE OPERAND POSITIVE. 
SET FD. 


:TEST, INSTRUCTION. 
: Z1S THE RESULT CORRECT. 


;BRANCH IF INCORRECT. 


31S RO CORRECT. 

BRANCH IF INCORRECT. 
:I1S THE FPS CORRECT? 
[BRANCH IF INCORRECT. 


THESE ARE DATA TABLES AND A DATA BUFFER. 
OOBTP1: 023245 


OOBTP2: 


001240 
001242 


001240 


RESULT INCORRECT: 
MOV #OOBTP1 , aA#STMP3 
#OOBTP2 , aS IMPS 


+140 BAD DATA 
OOBDONE 


MOV 
ERROR 
BR 
-# INCORRECT: 
#008 


SPEC DESTX 
ROX 


FPS INCORRECT: 
ao #210, a4$TMP3 
a awSTMP4 


ERROR +142 


“RSE TUP 
“SEE IF THE USER HAS EXPRESSED 





SET UP THE LOOP ON ERROR ADDRESS. 


3GO INITIALIZE THE FPS AND STACK; AND 




























N 
CKFPCAC FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 20-6 
133 SPECIAL DEST, MODE 1, TEST SEQ 0091 


; THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


3322 SAIC II IOISIOIISIIUIIIIIIUISIIOIIUISIOIUIIUIOIIIDIIUIOIIIOIIUINI IU I tt 


:#TEST 34 SPECIAL DEST, MODE 2, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 2 USING THE NEGD INSTR. 
ot 


° 
FF RARER AEA ERERRKREEERERRARRREERERREREREKREKERREERERER EE 


020046 000004 TST34: SCOPE 
3323 020050 PPB1: 
3324 020050 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
3325 020052 012701 020162 MOV #PPBTP1,R1 SET UP THE DATA BUFFER. 
3326 020056 012700 020172 MOV #PPBTP2,RO 
3327 020062 012702 000004 MOV #4 ,R2 
3328 020066 012021 1$: MOV (RO) +, (R1)+ 
3329 020070 077202 ; SOB R2,1$ 
3330 020072 012700 020162 MOV #PPBTP1,RO 
3331 020076 042710 100000 BIC #100000, (RO) MAKE OPERAND POSITIVE. 
3332 020102 072737 020116 001236 MOV #PPB2 , AAS TMP2 
3333 020110 012701 000200 MOV #200,R1 ;SET FD. 
$35¢ 020114 170101 LDFPS~ RI 
a339 020116 170720 PPB2: NEGD (RO) + TEST INSTRUCTION. 
3338 020120 170205 STFPS  R5 ;GET FPS. 
3339 020122 012701 020162 MOV #PPBTP1,R1 1S THE RESULT CORRECT. 
3340 020126 012702 020172 MOV #PPBTP2,R2 
3341 020132 012703 000004 MOV #4 ,R3 
3342 020136 022122 1$: CMP (R1)+,(R2)+ 
3343 020140 001020 BNE PPB10 ;BRANCH IF INCORRECT. 
3344 020142 077303 SOB R3,1$ 
3345 020144 022700 020172 CMP #PPBTP1+10,RO ;IS RO CORRECT. 
3346 020150 001024 BNE PPB15 ;BRANCH IF INCORRECT. 
3347 020152 022705 000210 CMP #210,R5 31S THE FPS CORRECT? 
3348 020156 001030 BNE PPB20 ;BRANCH IF INCORRECT. 
$305 020160 000435 BR PPBDONE 
3351 ; THESE ARE DATA TABLES AND A DATA BUFFER. 
3352 020162 023245 PPBTP1: 023245 
3353 020164 026720 26720 

020166 122324 122324 
3355 020170 052672 5267 
3356 020172 123245 PPBTP2: 123245 
3357 020174 026720 26720 
3358 020176 122324 122324 
$ 052672 267 
3361 REPORT -~ Sa INCORRECT: 
3362 020202 012737 020162 001240 PPB10: #PPBTP1 ,a#$TMP3 
3363 020210 012737 020172 001242 MOV #PPBTP2 , aa#$TMP4 
3364 020216 104143 1$: ERROR +143 ;BAD DATA 
seen 020220 000415 BR PPBDONE 


;REPORT RO INCORRECT: 


B & 
CKFPCAO FPI11F FLTG “eal PRT C MACRO M1111 24=SEP=79 15:03 PAGE 20-7 
1% SPECIAL DEST, MODE 2, TEST 


3368 020222 AF 364 020172 001240 PPB15: MOV #PPBTP1+10,a4$STMP3 
0037 001242 MOV RO, a#STMP4 
70 : ERROR +144 i SPEC DESTX ROX 
$37, 020236 000406 BR PPBDONE 


337 FPS INCORRECT: 
3374 020240 000210 001240 MOV #210, a4STMP3 
3375 020246 001242 MOV R5, aS TMP4 
$359 020252 5 : ERROR +145 
3378 020254 : 
020254 RSE TUP G0 Oa he ce THE FPS AND STACK; AND 
IF THE U EXPRESSED 


SOF TWARE 
; UAL CONSOLE SWITCH REGISTER (HAS 
‘THE "USER TYPED CONTROL G?). 


PITITITITITITITITITILITILITL TITTLE LLL LEE 


: TEST 35 SPECIAL DEST, MODE 4, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 4 USING THE NEGD INSTR. 


* 

eeee TT t iti tii t iii t isi i iiiitit iii i iti ii titi i titi iit i titi titi iit. 

TST35: 

QQB1: 

;SET UP THE LOOP ON ERROR ADDRESS. 

020374 MO #QQBTP1,R1 :SET UP THE DATA BUFFER. 
020414 #QQBTP2,RO 
000004 


#4 .R2 
(RO)+,(R1)+ 
R2,1$ 
#QQBTP1+10,RO 
177770 #100000, 516cR0» ;MAKE OPERAND POSITIVE. 
001236 #0082, a4$TMP 
3389 020322 MOV #200,R1 SET FD. 
3390 020326 170701 R1 
3392 020330 170740 : ~(RO) ;TEST INSTRUCTION. 


3394 020332 170205 R5 GET FPS. 
020374 MO #QQBTP1,R1 71S THE RESULT CORRECT. 
020414 #QQBTP2,R2 
000004 #4 ,R 
(R1)+,(R2)+ 
Q0810 ;BRANCH IF INCORRECT. 


R3,1$ 
020374 #QQBTP1,RO 21S RO CORRECT. 
00815 


000210 #210,R5 
00826 “BRANCH IF INCORRECT. 
QQBDONE 


THESE ARE DATA TABLES AND A DATA BUFFER. 
G0BTP1 : Oe3Se 5 

135354 

052672 52672 








=——_ 


CKFPCAO FP11F FLTG PNT PRT C 


T35 SPECIAL DEST, MODE 4, 
B12 020406 177777 177777 
020412 177777 
3413 020414 123245 
3414 020416 026720 
3415 020420 122324 
3416 020422 052672 
3417 
3418 
3419 020424 012737 020374 
3420 020432 012737 020414 
3421 020440 104146 
3422 020442 000415 
3423 
3425 020444 012737 020374 
3426 020452 010037 001242 
3427 020456 104147 
3428 020460 0004 
3429 
3430 
3431 
3432 020462 012737 000210 
3433 020470 010537 001242 
3434 020474 104150 
3435 
3436 020476 
020476 104412 
3437 
3438 
yo 020500 000004 
3440 020502 
020502 104413 ' 
020504 012701 020622 
3442 020510 01270C 020632 
3443 020514 012702 000004 
3444 020520 012021 
3445 020522 077202 
020524 012700 020642 
3447 020530 012710 020622 
020534 042737 100000 
3449 020542 012737 020556 
3450 020550 012701 000200 
3451 020554 170101 


3452 
3453 020556 170730 
3454 


MACRO M1111 
TEST 


C & 
24-SEP-79 15:03 PAGE 20-8 


177777 WORD =1,=1,=1,-1 
QQBTP2: 123245 
26720 
122324 
52672 
:REPORT RESULT INCORRECT: 
001240 QQ810: MOV #QQBTP1, a#$TMP3 
001242 MOV #QQBTP2. a#STMP4 
1$: ERROR +146 ;BAD DATA 
BR QQBDONE 
:REPORT RO INCORRECT 
001240 00815: #Q0BTP1, ae$TMP3 
mov RO, a¥STMP4 
1$: ERROR +147 :SPEC DESTX ROX 
BR QQBDONE . 
REPORT FPS INCORRECT: 
001240 20: MOV #210, a4$TMP3 
MOV R5, a#STMPL 
1$: ERROR +150 
QQBDONE : 
RSETUP :GO_INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 
MABRBARBASBAASLAAAASLASLALLASSLES EE SESE SLA RR ARR RRR RRR SARA RASS SRS ERASE SY 
: TEST 36 SPECIAL DEST, MODE 3, TEST 


THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 3 USING THE NEGD INSTR. 
- 


° 
DLE ERERRER ERE EER EE 


TST36: 
RRB1: 


020622 
001236 


RRB2: 


SCOPE 


SET UP THE LOOP ON ERROR ADDRESS. 
#RRBTP1,R1 SET UP THE DATA BUFFER. 
#RRBTP2,RO 


#4 ,R2 
(RO) +, (R1)+ 
R2, 


MAKE THE OPERAND POSITIVE. 


TMP2 
R1 SET FD. 
R} 


a(RO)+ : TEST INSTRUCTION, 


SEQ 0093 


aan 


D 
Alte FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 20-9 


% SPECIAL DEST, MODE 3, TEST SEQ 0094 

%55 020560 170205 STFPS RS ;GET FPS. 

3456 020562 012701 020622 MOV #RRBTP1,R1 z1S THE RESULT CORRECT. 

3457 020566 012702 020632 MOV #RRBTP2,R2 

3%458 020572 012703 000004 MOV #4,R3 

3459 020576 022122 i$: CMP (R1)+, (R2)+ 

3460 0 001021. BNE RRB10 :BRANCH If INCORRECT. 

3461 020602 077303 S08 R3,1$ 

3462 020604 022700 020644 CMP #RRBTP3+2,R0 71S RO CORRECT. 

3463 020610 001025 BNE RRB15 ‘BRANCH IF INCORRECT. 

3464 020612 022705 000210 CMP #210,R5 71S THE FPS CORRECT? 

3465 020616 001031 BNE RRB20 ‘BRANCH IF INCORRECT. 

366 020620 000436 BR RRBDONE 

3468 . ; THESE ARE DATA TABLES AND A DATA BUFFER. 

3469 020622 023245 RRBTP1: 023245 

3470 020624 026720 26720 

3471 020626 122324 122324 

3472 020630 052672 $2672 

3473 020632 123245 RRBTP2: 123245 

3474 020634 026720 267 

3475 020636 123324 123324 

3476 020640 052672 526 

hed 020642 020622 RRBTP3: RRBIP1 

;REPORT RESULT INCORRECT: 

3480 020644 012737 020622 001240 RRB10: MOV #RRBTP1 , aASTMP3 

3481 020652 012737 020632 001242 MOV #RRBTP2, a#STMPS 

3482 020660 104150 1$: ERROR +150 ;BAD DATA 

385 020662 000415 BR RRBDONE 

3485 ;REPORT nO INCORRECT: 

3486 020664 012737 020644 001240 RRAI5: SPRITES 2 aeSIMP3 

3487 020672 010037 001242 mov mpd, 

3488 020676 104152 1$: ERROR ty :SPEC DESTX ROX 

020 0004 BR RRBDONE 

3491 ;REPORT FPS INCORRECT: 

3492 020702 012737 000210 001240 RRB20: MOV #210, a4$TMP3 

3493 020710 010537 001242 MOV R5, aASTMPG 

3494 020714 104153 1$: ERROR +153 

3496 020716 RRBDONE : 

020716 10441 RSETUP :GO INITIALIZE THE FPS AND STACK: AND 

sSEE IF THE USER HAS EXPRESSED 
:THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 

— :THE USER TYPED CONTROL G?). 

2498 IOI IIIOIISIIO IOS IIDIOIIUIDIIOIUIUIOIIOIOIIUIUIDIIOIDIOIIOIDIDINIOIDIDIIOIDIDISINIOIUIOI DIO i 


Z*TEST 37 SPECIAL DEST. MODE 5, TEST : 
ey 


:*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
:*MODE 5 USING THE NEGD INSTR. 
** 


CF AAAAAAAAAAAAAERAKEEAEAAAEAERAAARARAKEAARAERAARREREATAAARARAERARRAAAR ERAS 
02072C 000004 TST37: SCOPE 
3499 020722 SSB1: 





CEEPCAD FP11F FLTG PNT PRT C 
137 SPECIAL DEST, MODE 5, 
20722 
3500 050754 012701 021044 
3501 020730 2700 021054 


509 0 

e219 020776 170101 
Han 021000 170750 
3514 021002 170205 


3515 021004 012701 021044 
3516 021010 012702 021054 
000004 


022700 021064 
3523 921034 022705 000210 
1031 


2737 021044 
2737 021054 


3543 

3544 

3545 021106 012737 021064 
3546 021114 010037 001242 
3547 021120 104155 

3548 021122 0004 

3549 

3550 

3551 021124 012737 000210 
3552 021132 010537 001242 
3553 021136 104156 


MACRO M1111 
TEST 


1$: 


177776 


SSBe: 


1$: 


E 8 
24=SEP=79 15:03 PAGE 20-10 


LPERR 
MOV #SSBIP1,R1 
MOV re 


#4 R2 
MOV (RO)+,(R1)+ 


R2, 
MOV  -#SSBTP3+2,R0 
MOV #SSBTP1,-2(RO) 
BIC #100000. a#SSBTP1 
MOV #SSB2 , AAS TMP2 


MOV #200,R1 
LDFPS = R1 
NE GD a-(RO) 
STFPS = R5 


MOV ASSBTP1,R1 
MOV #SSBTP2,R2 


#4 ,R3 
CMP (R1)+,(R2)+ 
$SB10 
R3,1$ 
CMP #SSBTP3,RO 
$B15 
CMP #210,R5 


BNE $$B20 
BR 5 SBDONE 


eer UP THE LOOP ON ERROR ADDRESS. 


UP THE DATA BUFFER. 


MAKE THE OPERAND POSITIVE. 


SET FD. 


; TEST INSTRUCTION. 
GET FPS 


[IS THE RESULT CORRECT. 


;BRANCH IF INCORRECT. 


31S RO CORRECT. 

[BRANCH IF INCORRECT. 
;I1S THE FPS CORRECT? 
[BRANCH IF INCORRECT. 


THESE ARE BATA TABLES AND A DATA BUFFER, 


SSBTP1: 02324 
26 


52 
SSBTP2: \e35° 


5 
SSBTP3: SSBTP1 
;REPORT — INCORRECT: 


001240 SSB10: 


001242 


#SSBIP1,a4$TMP3 
MOV #SSBIP2 ,a#STMP4 
ERROR +154 
BR SSBDONE 


;REPORT RO INCORRECT: 


001240 SSBI15: 


MOV yest as 


MOV 
1$: ERROR Rage 
BR SSBDONE 
;REPORT FPS INCORRECT: 
001240 §SB20: MOV #210, avSTMP3 
MOV R5, a#$TMP4 
1$: ERROR +156 


BAD DATA 


SPEC DESTX ROX 


SEQ 0095 


F 8 
CEEPCAD FPIIF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 20-11 
137 SPECIAL DEST, MODE 5, TEST SEQ 6096 


021140 104412 RSETUP eet Te us THE FPS AND bags AND 


VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


3556 VERB ARARARBRBABSRAAASALRASESASERERRRSESSR REESE RAS E RE RRR RRR RE RR SSR RSE R SRS SE SS 
TEST 40 SPECIAL DEST, FLOATING MODE 2, TEST 
’ THIS IS A TEST OF THE NEGF ses AND TSTF DESTINATION FLOWS 
: sMODE 2 USING THE NEGF INSTR 
MeABBAABAOSRBAAASAASSAAASAARESESRE RSE RARER RRR RRR RRR RRR RRR RRAR RRR RSS SS SY 

021142 000004 $140: SCOPE 
3557 021144 TTB: 

021144 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
3558 021146 012701 021256 MOV ATTBIP1,R1 :SET UP THE DATA BUFFER. 
3559 021152 012700 021266 MOV ATTBTP2_RO 
3560 021156 012702 000004 MOV #4 R2 
3561 021162 012021 1$: MOV (RO)+,(R1)+ 
3562 021164 077202 SOB R2,1$ 
3563 021166 012700 021256 MOV #TTBTP1,RO 
3564 021172 042710 100000 BIC #100000. (RO) :MAKE OPERAND POSITIVE. 

3565 021176 012737 021212 001236 MOV #TTB2, aASTMP2 
3566 021204 0612701 000000 MOV #000,R1 :SET FD. 
3567 021210 170101 LDFPS RI 
F4 021212 170720 TTB2: NE GF (RO) + STEST INSTRUCTION. 
3571 021214 170205 STFPS RS :GET FPS. 
3572 021216 012701 021256 MOV ATTBTP1,R1 :1S THE RESULT CORRECT. 
3573 021222 012702 021266 MOV ATTBIP2.R2 
3574 021226 012703 000004 MOV #4 R3 
3575 021232 022122 1$: C (R1)+, (R2)+ 
3576 021234 001020 BNE TTB10 :BRANCH IF INCORRECT. 
3577 021236 077303 SOB R3,1$ 
3578 021240 022700 021262 CMP #TIBIP1+4,RO 1S RO CORRECT. 
3579 021244 001024 BNE TTB15 “BRANCH IF INCORRECT. 
3580 021246 022705 000010: CMP #010.R5 ‘1S THE FPS CORRECT? 
3581 021252 001030 BNE TTB20 “BRANCH IF INCORRECT. 
3582 021254 000435 BR TTBDONE 
3584 ; THESE ARE DATA TABLES AND A DATA BUFFER. 
3585 021256 023245 TIBTIP1: 023245 
3586 021260 026720 
3587 021262 122324 122324 
3588 021264 052672 52672 
3589 021266 122245 TIBTP2: 123245 
3590 021270 026720 26720 
3591 021272 122324 122324 
3592 021274 052672 
3594 REPORT RESULT INCORRECT: 
3595 021276 012737 021256 001240 TTB10: MOV #1 TBTIP1 ,aaSITMP3 
596 021304 012737 021266 001242 MOV #TTBIP2. a#$IMP4 
3597 021312 104150 1$: ERROR +150 :BAD DATA 
ths 021314 000415 BR T TBDONE 


CKFPCAO FPI1IF FLTG PNT PRI C 


740 


SPECIAL 


3600 
3601 021316 


Wh 


3625 021424 
3626 


3627 021426 
3628 021430 
1436 


MACRO M1111 
TEST 


DEST, FLOATING MODE 2, 


012737 
010537 
104161 


104412 


021262 
001242 


021502 
021430 
000004 


021430 
100000 
021426 
000200 
005201 


021430 
021502 
000004 


000003 
000210 


001240 


001240 


021430 
001236 


005201 


REPORT i INCORRECT: 


G 8 
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+1815: #TTBTP1+4 ,aASTMP3 
MOV RO, a#S TMP, 
1$: ERROR +160 sSPEC DESTX ROX 
BR TTBDONE 
REPORT FPS INCORRECT: 
+1820: MOV #010, a4$TMP3 


MOV R5, aS TMP4 
1$: ERROR +161 


TTBDONE : 
RSE TUP 


;GO INITIALIZE THE FPS AND STACK; AND 


“THE DESIRE TO CHANGE THE SO E 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
“THE USER TYPED CONTROL G?). 


:TEST TITLE:SPECIAL DEST, MODE2, GR7 (IMMEDIATE) 


«ERR RAERRE RRR ERR RRRR ERE RRERERERER REE RE EERE EERE EERE ERE ERE ER 


TeTEST 41 
*% 


SEE ABOVE COMMENT FOR TEST TITLE 


*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
3*MODE 2( IMMEDIATE) USING THE NEGD INSTR. 
** 


TST41: SCOPE 

UUB1: 
LPERR 
MOV #UUBTP2 ,RO 
MOV MUUBTP1,R1 
MOV #4,R2 

1$ MOV (RO)+,(R1)+ 
SOB R2,1$ 
MOV MUUBTP7 ,RO 
BIC #100000 , @#UUBTP1 
MOV MUUB2 , AASTMP2 
MOV #200,R1 
LDFPS RI 
CLR ca 

UUB2 : NE GD (R7)+ 

UUBTP1: 5201,5201,5201,5201 


NOTE THAT AFTER EXECUTING THIS 
STFPS = R5 


MOV #UUBTP1 ,R3 
MOV MUUBTP2 ,R2 


MOV #4 RG 
1$: CMP (R3)+, (R2)+ 

BNE UB 10 

SOB R4,1$ 

CMP #3.R1 

BNE UUB1 

CMP #210,R5 

BNE 6 


5 RARER EREARERRAERARAEAEKREAAEREAERAERAERAARRARRARAAREERERARRERE REED 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP THE DATA BUFFER. 


sMAKE THE OPERAND POSITIVE. 
sSEY FD. 


TEST INSTRUCTION. 


‘aT R1 SHOULD CONTAIN 3. 
31S THE RESULT CORRECT. 


;BRANCH IF INCORRECT. 


WAS R1 INCREMENTED CORRECTLY. 
BRANCH IF INCORRECT 

ZIS THE FPS CORRECT? 

7BRANCH IF INCORRECT. 


SEQ 0097 





CKFPCAO FPIIF FLTG PNT PRT C 


6 
3447 021510 
3650 021512 
3633 021530 


5 
3656 021532 


3669 
3670 021576 
021576 


021600 
3672 021602 
1602 


3682 021650 
3683 


3684 021652 
3685 021654 


170101 


00500 | 
170760 


021430 001240 
021502 001242 


000210 001240 
001242 


000003 


021432 
001240 


001242 


021726 
021736 
000004 


014525 
100000 
021654 
000200 


005201 


H 
MACRO M1111) 24=SEP=79 15:03 PAGE 20-13 
SEE ABOVE COMMENT FOR TEST TITLE 


SEQ 0098 


THESE ARE DATA TABLE. 
UUBTP2 : 133¢0! 


201 
5201 
5201 
REPORT RESULT INCORRECT: 
UUB10: MOV MUUBTP1 , aS TMPS 
MOV _ MUUBTP2 , aA STMPS 
1$: ERROR +162 BAD DATA 
BR UUBDOWE 


;REPORT FPS INCORRECT: 
JUB20: MOV #210, a4STMPS 


MOV R5,@A4$TMP4 
1$: ERROR +163 zFPS 

BR UUBDONE 
ZREPORT PC INCORRECTLY INCREMENTED DURING EXECUTION. 
UUB15: ny oe R1 


MOV UeTP +2,R2 
MOV Re, 2. aASTMPS 


MOV Res ewes 
1$: ERROR +1 3;PC BAD CONSTAND B GR7X 
UUBDONE : 
RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


SEE IF THE - HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH >> allt (HAS 
THE USER TYPED CONTROL G?) 


PPTITITIIIITI LITT TTI TTT LTT ITT TLL LLL LL 


T*TEST 42 SPECIAL DEST, MODE 6, TEST 
** 


:*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 
;*MODE € USING THE NEGD INSTR. 


-* 
. 


WEARER ERRRARAARASAR SR RAR RRS RRR RRR RRR RRR RR RRRR RR ARR RRR RRR SDSS SD | 


TST42: SCOPE 


XXB1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #XXBTP1,R1 SET UP THE DATA BUFFER. 
MOV #XXBTP2,RO 
MOV #4 ,R2 
1$: MOV (RO)+,(R1)+ 
SOB R2,1$ 
MOV #XXBTP1-5201, 
BIC #100000, anna”; ;MAKE OPERAND POSITIVE. 
MOV #XXB2 , AASTMP2 
MOV #200,R1 sSET FO. 
LDFPS RI 
CLR R1 
XXB2: NEGD 5201(RQ) 3TEST INSTRUCTION, 


I & 
CKFPCAQ FPITF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 21 
TSe SPECIAL DEST, MODE 6, TEST 


387 
3688 021660 170205 STFPS) RS GET FPS. 
3689 021662 005701 TS? R} 





CKFPCAO FP11F FLTG PNT PRT C 
T42 SPECIAL DEST, MODE 6, 


3691 021664 
3692 021666 


3702 021724 
3703 


3704 
3705 021726 
3706 730 


3710 021740 
3711 021742 
3712 021744 
3713 
3714 
3715 
3716 021746 
3717 021754 
3718 021762 
3719 021764 
3720 
3721 
3722 021766 
3725 022004 
3726 


3727 
3728 022006 


052672 


012737 
012737 
104215 
000425 


012737 
012737 
104216 
000415 


012737 


3731 022022 000406 
3732 


3733 
7 


3734 
3735 022024 
3736 022032 
3737 022036 
3738 


3739 022040 
022040 


104412 


021726 
021736 
000004 


014525 
000210 


021656 
021660 


021726 
021756 


014525 
001242 


000210 
001242 


MACRO M1111 
TEST 


001242 
001240 


001240 
001242 


001240 


001240 


J. 8 
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BNE XXB25 :wWAS THE PC CORRECT AFTER EXECUTION? 
MOV #XXBTP1,R1 z1S THE RESULT CORRECT. 
MOV #XXBTP2_R2 
MOV #4 ,R3 
1$ CMP (R14) +, (R2)+ 
BNE XXB10 :BRANCH IF INCORRECT. 
SOB R3,1$ 
CMP #XXBTP1=5201,RO :1S RO CORRECT. 
BNE XXB15 “BRANCH IF INCORRECT. 
CMP #210,R5 SIS THE FPS CORRECT? 
BNE XxXB20 “BRANCH IF INCORRECT. 
BR XXBDONE 
: THESE ARE DATA TABLES AND A DATA BUFFER. 
KXBTP1: 023245 
26720 
122324 
52672 
XXBTP2: 123245 
26720 
122324 
672 
:REPORT PC INCORRECT AFTER EXECUTION. 
KXB25: MOV #XXB2+2, aS TMP4 
MOV AXXB2+4, oh de 
1$: ERROR +215 :PC NOT INCREMENTED BY 2. 
BR XXBDONE 
:REPORT RESULT INCORRECT : 
KXB10: MOV #XXBIP1 , A#STMP3 
MOV #XXBTP2. aASTMPG 
1$: ERROR - +216 :BAD DATA 
BR XXBDONE 
: REPORT RO INCORRECT: 
KXB15: #XXBTP1~ “5201. a#$TMP3 
add RO, aS TMP. 
1$: FRROR +217 sSPEC DESTX ROX 
BR XXBDONE 
sREPORT FPS INCORRECT: 
KXB20: MOV #210, a4STMP3 
MOV R5, aASTMPG 
1$: ERROR +220 


XXBDONE : 
RSE TUP 


:G0 INITIALIZE THE FPS AND STACK; 
SEE IF THE USER HAS eet 
[THE DESIRE TO CHANGE THE SOFTWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
:THE USER TYPED CONTROL G?) 


SF EAAAAA KAA AREA AERA AAAAEAERAAAKEKAEAAARAERAAAEARARARARERAAENRAREKE EY 


i*TEST 43 SPECIAL DEST, MODE 7, TEST 





CKFPCAO FP11F FLTG PNT PRT C 


143 SPECIAL DEST, MODE 7, 


022042 

3742 
3743 022044 
044 


3754 022120 
3755 
3756 022122 
3757 022124 
3758 

3759 022130 


3772 022174 
3773 


3774 
3775 022176 


1 

3783 022216 
3784 
3785 
3786 022220 
3787 022226 
3788 022234 
3789 022236 

3790 
3791 


170101 


005001 
170770 
170205 


022176 


016737 
016737 
104221 
000425 


022176 
022206 
000004 


015015 
022176 005201 
100000 022176 
022124 001236 
000200 


005201 
022776 


022206 
000004 


015015 
000210 


177702 001242 
177676 001240 


kK & 
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SEQ 0107 


_ 
;*THIS IS A TEST OF THE NEGF ABSF AND TSTF DESTINATION FLOWS 


;*MODE 7 USING THE NEGD INSTR. 
oa 


CF RRARARARARAARARARARAERAAARAAKRAERARARREKRKRRERRARARERARARAAEENE REE 


15143: SCOPE 
YYB1: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #YYBTP1,R1 :SET UP THE DATA BUFFER. 
MOV #YYBTP2.RO 
MOV #4 R2 
1$: MOV (RO) +, (R1)+4 
SOB R2, 
MOV #YYBTP3-5201,RO 
MOV #YYBTP1,5201(RO) 
BIC #100000, a#YYBTP1 :MAKE THE OPERAND POSITIVE. 
MOV #YYB2 , aASTMP2 
MOV #200,R1 sSET FD. 
LDFPS 1 
CLR R1 
YYB2: NEGD  @5201(RO) TESTIS TRUCTION. 
STFPS RS :GET FPS. 
TST RI ‘WAS THE PC CORRECT AFTER EXECUTION? 
BNE YYB25 
MOV #YYBTP1,R1 :1S THE RESULT CORRECT. 
MOV #YYBTP2_R2 
MOV #4 ,R3 
1$: CMP (R1)+, (R2)+ 
BNE vvB10 :BRANCH IF INCORRECT. 
CMP #YYBTP3-5201,RO :IS RO CORRECT. 
BNE YYB15 “BRANCH IF INCORRECT. 
CMP #210 R5 ‘1S THE FPS CORRECT? 
BNE YB20 ‘BRANCH IF INCORRECT. 
BR YYBDONE 


; THESE ARE DATA TABLES AND A DATA BUFFER. 
YYBTP1: 023245 


52 
YYBTP2: 123245 
26 


5 
YYBTP3: YYBTP1 


REPORT PC INCORRECT AFTER EXE CUT ION. 
VYB25: MOV YYB2+2,a4$ TMP 
MOV YYB2+4, ees 
1$: ERROR +221 3PC NOT INCREMENTED BY 2. 
BR YYBDONE 


REPORT RESULT INCORRECT: 


CKFPCAO FP11F FLIG PNT PRT C 
143 SPECIAL DEST, MODE 7, 


3792 022240 012737 022376 
3793 022246 012737 022206 
3794 022254 104222 

3795 022256 

3796 


oO 


3797 
3798 022260 012737 aE 


3803 
3804 022276 012737 000210 
3805 022204 tar oke 001242 


3808 022312 
022312 104412 


022314 000004 


3 
3817 022320 004767 000634 
000000 


3839 
3840 022374 
022374 104413 


L & 
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001240 YYB10: MOV #YYBTP1 ,@#$TMP3 

001242 MOV #YYBTP2,aA$STMP4 
ERROR +222 BAD DATA 
BR Y YBDONE 


REPORT RO INCORRECT: 
001240 vyB15: Ha ra hy the me -5201,aASTMP3 


1$: ERROR 8353 sSPEC DESTX ROX 
BR YYBDONE 
:REPORT FPS INCORRECT: 
001240 YYB20: MOV #210, a4STMP3 
MOV RS, aS TMP4 
18: ERROR +224 
YYBDONE : 
RSE TUP :GO_INITIALIZE THE FPS AND STACK; AND 


so 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 


;THE USER TYPED CONTROL G?). 


SERRE REAR KEKE EEE EEE 


:#TEST aS NEGD, ABSD AND TSTD TEST 
THIS IS A TEST OF THE NEGD ABSD AND TSTD INSTRUCTIONS. 
-* 


e 
STARR EEEKRRREEEEEEKEREEREREKEKE ERE REE REREREREER EE EE 


TST44: SCOPE 
At NEGD WITH POS NONZERO OPERAND 
LPERR SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC ,NATSUB 
1$: 0 ;FLAG=NEGD. 
2$: 16341 ; OPERAND. 
55772 
21133 
55447 
3$: 116341 sRESULT. 
55772 
21133 
55447 
4$: 16341 ERROR RES. 
55772 
21133 
55447 
5$: 207 FPS BEFORE EXECUTION. 
210 iFPS gis EXECUTION. 
eye ZERR OR FPS. 
6$: —— as ‘£10<=--£10*200X ST 336 
ERROR +201 BUT ENBT ST 336X WENT TO 053 INTO 453 


7$: 
+ TEST NEGD WITH NEG OPERAND. 


LPERR SET UP THE LOOP ON ERROR ADDRESS. 


SEQ 0102 


CKFPCAO FP11F FLTG PNT PRT C 
T44 NEGD, 


ABSD AND TSTD TEST 
004767 000556 
000000 


3841 022376 


022514 
3881 022516 
3882 022520 
3883 022522 
3884 022524 
3885 022526 
3886 0225 


3889 0225 

3890 022536 
3891 022540 
3892 022542 
3893 022544 


3894 022546 
3895 022550 


M & 
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PC,NATSUB 


Ww 


w 


4$: 


OMAP AUT AAT UTR 


5$: 


6$: +200 
7$ 
+202 
POSITIVE OPERAND 


;FLAG=NEGD. 
30 


PERAND. 


sRESULT. 


ERROR RES. 


\ 


FPS BEFORE EXECUTION. 


FPS AFTER EXECUTION. 
Ay OR FPS. 


sFEC 
TE10<==-E10*200x $336 


;BUT ENBT X ST336 TO 453 INTO 053 


;SET UP THE: LOOP ON ERROR ADDRESS. 
;FLAG=ABSD. 
; OPERAND. 


PC,NATSUB 


RESULT. 


4$: 


5$: 


ERROR RES. 


FPS BEFORE EXECUTION. 


FPS AFTER EXECUTION. 


6$: +203 
BR 7$ 
+203 
7$: 
; TEST ABSD WITH NEG. OPERAND 
WWB4 : 


ERROR “re 
EITHER 
BUT ST 055 fo. 336 INTO 335 


;OR BUT ENBT ST 335 TO 452 INTO 052 


SET UP THE LOOP ON ERROR ADDRESS. 


PC ,NATSUB 


;FLAG=ABSD. 
OPERAND. 


;RESULT. 


SEQ 0103 





CKFPCAO FP11F FLTG PNT PRT C 
T44 NEGD, 


ABSD AND TSTD TEST 


3896 022552 


3910 022606 

3911 

3912 022606 
022606 

3913 022610 


3914 022614 
3915 022616 


3950 022722 


076567 
032123 
04 


000344 


000266 


MACRO M1111 


4$: 


5$: 


6$: 


3$: 


4$: 


5$: 


6$: 


N & 
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76567 
32123 
3234 
154345 ZERROR RES. 
76567 
32123 
43234 
217 3;FPS BEFORE EXECUTION. 
200 3FPS AFTER EXECUTION. 
| ZERROR FPS. 
ERROR +204 3E10*E10*200x ST 452 
BR 7$ 
3 ERROR +171 
s TEST WITH POSITIVE OP 
WWBS5 : 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,NATSUB 
2 sFLAG=TSTD. 
12321 ; OPERAND. 
45654 
70107 
34543 
12321 RESULT. 
45654 
70107 
34543 
112321 ZERROR RES. 
45654 
70107 
34543 
17 ;FPS BEFORE EXECUTION. 
200 sFPS AFTER EXECUTION. 
210 sERROR FPS. 
_—? _" ;BUT (OP1B) xX ST044 TO 336 INTO 334 


3$: 


4$: 


3 ERROR +206 ;BUT ENBT ST 334 TO 453 INTO 0535 
;TEST TSTD WITH NEG OP 
WWB6 : 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,.NATSUB 
2 sFLAG=TSTD. 
123765 ; OPERAND. 
23407 
34510 
45621 
123765 ;RESULT. 
23407 
34510 
45621 
23765 ;ERROR RES. 
23407 
34510 
45621 


SEQ 0104 


8 ~ 
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NEGD, ABSD AND TSTD TEST SEQ 0105 
3951 022724 000207 5$: 207 FPS BEFORE EXECUTION. 
3952 022726 000210 210 ZFPS AFTER EXECUTION. 
3953 022730 000200 200 ERROR FPS. 
3954 022732 177777 =] 
3955 022734 104207 68: ERROR +207 ;BUT OPB1 ST 055 TO 335 INTO 334 
3956 022736 000401 BR 7$ 
3957 022740 104210 ERROR +210 ;BUT ENBT ST 334 TO 053 INTO 453 
3958 022742 7$: 
:TEST TSTD 0 OP 
3960 022742 WB? : 
022742 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
3961 022744 004767 000210 JSR PC ,NATSUB 
3962 022750 000002 1$: 2 :FLAG=TSTD. 
3963 022752 000175 2s: 175 “OPERAND. 
3964 022754 176737 176737 
3965 022756 071727 71727 
022760 037574 37574 
3967 022762 000175 38: 175 :RESULT. 
3968 022764 176737 176737 
3969 022766 071727 71727 
022770 037574 37574 
3971 022772 4$ 0 ;ERROR RES. 
3972 022774 000000 0 
3973 022776 000000 0 
4 023000 000000 0 
3975 023002 000200 5$: 200 FPS BEFORE EXECUTION. 
3976 023004 000204 204 FPS AFTER EXECUTION. 
3977 023006 000214 214 ERROR FPS. 
3978 023010 177777 -1 
3979 023012 104211 6S: ERROR +211 :;BUT OP1B ST 255 TO 311 OR 312 INTO 310 
023014 000401 BR 7 
3981 023016 104212 ERROR +212 ;BUT ENBT ST 310 TO 402 INTO 002 
3982 023020 7$: : 
:TEST TSTD -0 OP FIUV=0 
3984 023020 WB : 
023020 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
3985 023022 004767 000132 JSR PC ,NATSUB 
3986 023026 000002 1$: 2 FLAG=TSTD. 
3987 023030 100123 2$: 100123 S OPERAND. 
23032 021012 21012 
23034 034565 34565 
023036 043210 43210 
3991 023040 100123 3$: 100123 ;RESULT. 
3992 023042 021012 21012 
3993 023044 034565 34565 
3994 023046 043210 43210 
3995 023050 000000 48: 0 ERROR RES. 
3996 023052 000000 0 
3997 023054 000000 0 
3998 0 000000 0 
023060 040203 5$: 40203 FPS BEFORE EXECUTION. 
4000 023062 040214 040214 SFPS AF TER EXECUTION. 
4001 023064 140214 140214 TERROR FPS. 
002 023066 177777 7 
4003 023070 104211 6$: ERROR +211 i+ 
4004 023072 000401 BR 7$ 
4005 023074 104213 ERROR +213 ;BUT FIUV ST 257 TO 355 INTO 255 





——_~, 


CKFPCAO FPIIF FLTG PNT PRT C 
144 NEGD, ABSD AND TSTD TEST 


Oo jololejleleojeleoleleleolelele) 
POMPPPNOPoPNnefenoryo ~ 
=: =} 


4031 023154 
4032 


4033 
4034 


000401 
104214 


000167 000414 


. . 
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7$: 
sTEST TSTD <0 OP FIUV=1 
WwA9 : 


LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
PC,NATSUB 
sFLAG=TSTD. 


; OPERAND. 
sRESULT. 
4$: 0 ERROR RES. 


0 
5$: FPS BEFORE EXECUTION. 
sFPS AFTER EXECUTION. 
ERROR FPS. 
6$: +211 i+ 
BR 7 
+214 ;BUT FIUV ST 257 TO 255 INTO $55 
WWD ONE 


3 THIS SUBROUTINE, NATSUB, IS USED TO SET UP THE OPERANDS, EXECUTE 
; THE EITHER A TSTD, AN ABSD OR A NEGD INSTRUCTION AND CHECK THE RESULTS. A CALL 


7$: 


SEQ 0106 





—_—~ 






























.. 
CKFPCAO FPI1IF FLTG PNT PRT C _— M1111 24=SEP=79 15:03 PAGE 23 
Ta NEGD, ABSD AND TSTD TEST SEQ 0107 


prt 370 IT IS MADE THUS: 

4038 ; JSR PC ,@4NATSUB 

4039 : FLAG: «WORD X ; INSTRUCTION TYPE FLAG. 
4040 é ACARG: .WORD KLXLX,X ; OPERAND 

4041 ; t «WORD X,X,X,X sEXPECTED RESULT 

4042 : ERRES: .WORD X,X,X,X ;ERROR RESULT 

4043 3 FPSB: -WORD X ;FPS BEFORE EXECUTION 
4044 : FPSA: WORD x “FPS AFTER EXECUTION 
4045 ; FEC: -WORD X pai Y FEC 

4046 J ERFPS: .WORD xX ;ERROR FPS. 

4047 ; ERR1: ERROR +X ;DATA ERROR. 

4048 : BR CONT 

4049 ; 7 ERR2: ERROR +X ;FPS ERROR. 

pits ; CONT: ;RETURN ADDRESS 

4052 . THE OPERAND IS SET UP IN NATBF1. THEN 

4053 * THE EITHER THE TSTD, NEGD OR ABSD yt he IS EXECUTED. 

4054 *NATSUB USES THE FIRST OPERAND AS A FLAG TO DETERMINE WHICH INSTRUCTION 
4055 ;1S TO BE EXECUTED: 0 = NEGD, 1 = ABSD, 2 = TSTD. 

4056 : THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
4057 > COMPARED WITH FPSA. IF THIS TOO IS CORRECT NATSUB RETURNS CONTROL 
4058 :TO THE CALLING ROUTINE AT CONT. IF THE FPS IS 

4059 : ARE IT TO ERROR FPS. IF THIS MATCHES THEN are WILL RETURN 

4060 >TO THE ERROR CALL AT ERR2, OTHERWISE NATSUB ITSELF 

4061 [REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 
4062 ; INSTRUCTION IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
4063 : T ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

4064 ; THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN NATSLB 

4065 WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

4066 ;RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND NATSUB WILL 

mrs 4 ;REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


4069 
4070 023160 012601 NATSUB: MOV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
4071 023162 010102 MOV R1,R2 :COPY THE OPERAND. 

4072 023164 062702 000002 ADD #2,R2 

4073 023170 012703 023562 MOV ANATBF1,R3 

4074 023174 012704 000004 MOV #4 RG 

4075 023200 012223 1$: MOV (R2)+, (R3)+ 

4076 023202 077402 S0B R4,1$ : 

4077 023206 016100 000032 MOV 32(R1) RO :LOAD THE FPS. 

4078 023210 170100 LDFPS RO 

4079 023212 012700 023562 MOV #NATBF1,RO :SET UP THE OPERAND ADDRESS. 
4080 023216 011102 MOV (R1) ,.R2 ‘GET THE FLAG TO DETERMINE WHICH 
4081 023220 006302 ASL R2 ; INSTRUCTION TO EXECUTE. 

4082 023222 006302 ASL R2 [0 = NEGD, 1 = ABSD, 2 = TSTD 
4083 023224 012703 023240 MOV #NATINS,R3 

4084 023230 060203 ADD R2.R 

4085 023232 010337 001236 MOV R3,. a#$TMP2 

4086 023236 000113 JMP (R3) :GO EXECUTE THE INSTRUCTION. 
4087 023240 170710 NATINS: NEGD (RO) 

4088 023242 000403 BR 2$ 

4089 023244 770610 ABSD (RO) 

4090 000401 $ 





(RO) 





023246 
4091 023250 
4092 


— a 


E * 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111) 24=SEP=79 15:03 PAGE 23-1 
144 NE GD 


. ABSD AND TSTD TEST SEQ 0108 
4093 023252 170204 23: STFPS RG - ;GET THE FPS. 
4094 023254 170305 STST R5 sGET THE FEC. 
4095 023256 010102 MOV R1,R2 
40% 023260 062702 000002 ADD #2.R2 
4097 023264 010237 001240 MOV R2. ahSTMP3 
4098 023270 702 000010 ADD #10,R2 
4099 023274 010237 001244 MOV R2,a4$TMPS 
4100 023300 012737 023562 001242 MOV #NATBF 1, aS TMP4 
4101 023306 010437 001250 MOV R4, aSTMP7 
4102 023312 016137 000034 001252 MOV 34(R1),a#$TMP10 
4103 023320 10100 MOV R1,RO sWAS THE RESULT CORRECT? 
4104 023322 062700 000012 ADD #12,R0 
4105 023326 012702 023562 MOV ANATBF 1,R2 
4106 023332 012703 000004 MOV #4,R3 
4107 023336 02202 38: CMP (RO) +, (R2) + 
4108 023340 001014 BNE 10$ ;BRANCH IF INCORRECT. 
4109 023342 077303 S0B R3,3$ 
4110 023344 026104 000034 CMP 34(R1) RS WAS THE FPS CORRECT? 
4111 023350 001032 BNE 15$ * BRANCH IF INCORRECT 
4112 023352 005761 000034 TST 34(R1) cIF THE EXPECTED FPS. WAS NEGATIVE CHECK THE FEC. 
4113 023356 100003 BPL 4$ 
4114 023360 026105 000040 / CMP 40(R1),R5 WAS THE FEC CORRECT. 
4115 023364 001037 BNE ;BRANCH IF INCORRECT. 
4116 023366 000161 000050 4$: JMP 50(R1) “RETURN. 
4118 THE RESULT WAS INCORRECT BUT WAS THIS FAILURE ANTICIPATED? 
4119 sSEE IF THE RESULT WAS ANTICIPATED: 
4120 023372 i0$: 
4121 023372 011105 MOV (R1) RS 
4122 023374 006305 ASL R5 
4123 023376 006305 ASL RS 
4124 023400 062705 023512 ADD WNATERI RS 
4125 023404 010100 MOV R1.RO 
4126 023406 062700 000022 ADD #22,RO 
4127 023412 012702 023562 MOV #NATBF 1,R2 
4128 023416 012703 000004 MOV #4,R3 
4129 023422 022022 11$: CMP 8) 4, (R2)+ 
4130 023424 001003 BNE 123 ;BRANCH IF NOT ANTICIPATED. 
4131 023426 077303 SOB R3,11$ 
4133 Z THE ERROR WAS ANTICIPATED SO RETURN. 
4134 023430 000161 000042 JMP 42(R1) 
4136 THE ve WAS NOT ANTICIPATED SO REPORT IT HERE. 
tite 023434 000115 12$: (R5) :GO TO THE PROPER ERROR CALL. 
4139 ;THE FPS WAS INCORRECT. 
4140 023436 026105 000036 45$: CMP 36(R1)_RS :WAS THIS ERROR ANTICIPATED? 
4141 023442 001002 BNE 16$ “BRANCH IF NOT ANTICIPATED. 
4143 : THE FPS ERROR WAS ANTICIPATED SO RETURN. 
4144 023444 000161 000046 JMP 46(R1) 
4146 ; THE FPS FAILURE WAS NOT ANTICIPATED SO REPORT IT HERE. 
4147 023450 011102 16$: MOV (R1),R2 : 
4148 023452 006302 ASL R2 
4149 023654 006302 ASL R2 
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023530 ADD #NATER2,R2 
JMP (R2) :GO TO THE PROPER ERROR CALL. 


-REPORT THAT THE FEC WAS INCORRECT. 
000060 001256 20S: MOV 40(R1), arSTHP12 
001254 RS, aS TM 
(Ri) ye 
R2 


Re 
023544 #NATERS,R2 
| (R2) :GO TO THE PROPER ERROR CALL. 


Th. £4 kg THE ERROR CALLS FOR EACH INDIVIDUAL INSTRUCTION AND CONDITION. 
NATER1: ERROR +165 sNEGD BAD DATA 


” BR 
ees ;ABSD BAD DATA 


ERROR 6 ;TSTD BAD DATA 
NATRET: JMP 


:FPS INCORRECT: 
NATER2: ERROR ;NEGD 


BR 
ERROR 7 ABSD 
BR 
ERROR 2 iTSTD 
BR 


FEC INCORRECT: 
NATER3: ERROR ;NEGD 


BR 
ERROR ;ABSD 
BR 


ERROR 75 i TSTD 
023556 BR 


4185 

4186 023560 177777 . WORD 1 

4187 023562 177777 177777 (177777 ~NATBF1: .WORD -1,-1,-1.-1,-1 

cies 023570 177777 177777 

4189 023574 WWBDONE : 

023574 104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 

7SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
S VIRTUAL CONSOLE SWITCH REGISTER (HAS 
>THE USER TYPED CONTROL G?). 


CLARA ARAAAAAAAARAERAAEARAAARAEAAAEEAATARAEARARAEAAARAAHERAARAAEAEAES 


— 45 SOURCE MODES, MODE 1 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 1 
USING THE LDFPS INSTR 


MmMABRARERASSSSRESR REE RR RR RRR RRR RR RRR RRR RRR RRR RRR RRR RRR RRR SRR REESE | 


145: SCOPE 


te 
te 
te 
18 


023576 000004 
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— MODES, MODE 7 (FL=0), TEST SEQ 0110 

4200 
4201 
4202 023600 AAC 1: 
4203 023600 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4204 023602 012700 023660 MOV #AACTP1,RO sSET UP TEST DATA IN BUFFER. 
4205 023606 012710 147517 MOV #147517. (RO) 
4206 023612 012737 147517 001240 MOV #147517, @A$TMP3 ;SAVE DATA IN CASE OF ERROR. 
4207 023620 012737 023634 001236 MOV HAAC2, AASTMP2 
4208 023626 012737 023720 000004 MOV #AAC 20, AAERRVECT :SET UP FOR TRAPS TO 4. 
rit 023634 170110 AAC2: LDFPS (RO) S TEST INSTRUCTION. 
rat 023636 170205 STFPS RS :GET FPS 
4213 023640 020027 023660 CMP RO, #AACTP1 1S RO CORRECT? 
4214 023644 001007 BNE AAC10 ‘BR IF NOT. 
4215 023646 022705 147517 CMP tt jade RS sis bps CORRECT? 
4216 023652 001013 SNE AAC] “BR IF NOT ° 
4217 023654 0004 37 BR NACDONE 
4219 ; TEST BUFFER AND DATA: 
4220 023656 177777 ~ 
4221 023660 147517 AACTP1: 147517 
4222 023662 177777 he 
4223 
4224 s REPORT ie INCORRECT. 
4225 023664 012737 023660 001240 AAC10: HAACTP1, aASTMP3 
4226 023672 010037 001242 mov RO, a#STMP4 
4227 023676 194225 1$: ERROR +225 :RO BAD BUT FSRC FAILED 
4208 023700 000425 BR AACDONE 
4230 ZREPORT FPS INCORRECT 
4231 023702 012737 147517 001240 AAC 11: MOV #147517, @ASTMP3 ;REPORT FPS INCORRECT. , 
4232 023710 010537 001242 MOV RS, aA$STMP4 . 
4233 023714 104226 1$: ERROR +226 
4234 023716 000416 BR AACDONE | 
4236 ; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
4237 sEMECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
4238 sFAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 
4239 023720 AAC20: 
4240 023720 011602 MOV (SP) ,R2 
4241 023722 020227 023636 CMP R2, MAAC 2+2 
4242 023726 001405 BEQ 1$ 
4243 023730 020227 023640 CMP R2,AAAC2+4 
4244 023734 001402 BEQ 1$ 
4245 023736 000137 046250 JMP aa#CPSPUR 
4246 023742 022626 1$: CMP (SP)+, (SP) + 
4247 023744 010237 001236 MOV R2, a#$TMP2 
4248 023750 104227 2$: ERROR +227 :ODD ADRES 
rsa 023752 000400 BR AACDONE :BUT FDSTX IN ST 771 
4251 023754 AACDONE : 

023754 


104412 RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 


CKFPCAO FRIIF FLTG 
T SOURCE MODES, 


023756 
4256 023760 
023760 
4257 
4258 023762 


rota) 024006 
4264 024014 
4265 
4266 024016 
4267 
4268 024020 


4272 024034 
4273 
4274 
4275 
4276 024036 
4277 024040 


4278 024042 
42 


p24) 024076 


4 024 100 
4297 024100 
4298 024102 
4299 024106 


000004 


104413 


012737 
170120 
170205 
ae 


PNT PRT C 
MODE 1 (FL=0), TEST 


024040 
145212 
145212 
024014 
024100 


024042 
145212 


024042 
001242 


145212 
001242 


02401€ 


MACRO M1111 


H ° 
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i; THE USER TYPED CONTROL G?). 


> SRAERAARAAAAAARAAERAEERARARERAAAAEEARARAAHHAAEH HAART EEHRREHRRARenene 


taTE 
fe 
a. 
** 


ST 46 


SOURCE MODES, 


MODE 2 (FL=0), TEST 


THIS IS A TEST OF SOURCE MODE 2 
USING THE LDFPS INSTR 


° 
4 SRERRAEAEAEERAEEEAARRERAAAEERAAAARERRARARERRARAAETAARRAHHERAHEHERREEEHEEES 


TS14 


6: SCOPE 


BBCI: 


001240 
001236 
000004 


BBC 2: 


;SET UP THE LOOP ON ERROR ADDRESS. 


;SET UP TEST DATA IN BUFFER. 


) 
#145212, SASS SAVE DATA IN CASE OF ERROR. 


#BBC 2, a4STMP 


#BBC20, AAERRVE CT 


(RO) + 

RS 
ae 
#145212,R5 
BBC 11 

BBC DONE 


: TEST — AND DATA: 


BRCTP?1: ~~ 
sREPORT 
001240 ®8BC10: 
MOV 
1$: ERROR 
BR 
;REPORT 
001240 ®8BC11: 
MOV 
1$: ERROR 


-1 


A INCORRECT. 


SET UP FOR TRAPS 10 4. 
s TEST INSTRUCTION. 
:GET FPS 
71S oj CORRECT? 
z F NOT. 
sIS THE FPS CORRE Ci ? 
“BR IF NOT. 


ro hale f aAr$ TMP 


RO, a#$TMP 
+230 
BBCDONE 


FPS INCORRECT 
MOV 


;RO BAD BUT FSRC FAILED 


#145212 -aWSTMP3 ; REPORT FPS INCORRECT. 


; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
ZEXECUT LON: Of THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 


sFAILURE. OTHERWISE GO TO THE SPURIOUS 
BBC 20: 


(SP) ,R2 
ng MBC 202 


TRAP TO 4 HANDLING. 


SEQ 0171 


———— eee 


aw FPIIF FLTG PNT PRT 
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E MODES, MODE : (FL=0), TEST 


4300 024110 


4305. 024130 
4306 


4307 
4308 024132 
024132 


024134 

4312 
4313 ole 
“314 024136 
4315 024140 


4326 024214 

4327 

4328 024216 
024224 

4329 024226 

4330 024230 
024236 


4331 
4332 024240 


4341 024276 


020227 024020 CMP R2,ABRC2+4 
00140 BEQ 1$ 
009137 046250 JMP aaCPSPUR 
022626 1$: CMP (SP) +, (SP) + 
010237 001236 MOV R2,aa$TMP2 
104232 2$: ERROR +232 :ODD ADRES 
:BUT FDSTX IN ST 771 
BBCDONE : 
104612 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
ZSEE IF THE USER HAS EXPRESSED 
“THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
[THE USER TYPED CONTROL G?). 
CE TRAAAAAAARAAARARRARAARAAHARRARAARRARREURAAAARARARARAEARHAAEREREHE ES 
T*TEST 47 SOURCE MODES, MODE 4 (FL=0), TEST 
se 
t* THIS IS A TEST OF SOURCE MODE 4 
:* USING THE LDFPS INSTR 
a. 
+: (ROSE RRSBSSRARRSRASASASASAASASRRRARRR RRR RRRRRRRRARRRRRRRRRRR RR RRR RRS SRS SY 
000004 S147: SCOPE 
DDC1: 
104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
012700 024230 MOV #DDCTP1+2,RO «SET _UP THE TEST DATA BUFFER. 
012762 105252 177776 MOV #105252, -2(RO) 
012737 105252 001240 MOV #105252. arS1MP3 ;SAVE DATA IN CASE OF ERROR. 
012737 024174 001236 MOV #DDC2,a#$TMP2 
012737 024274 000004 MOV #DDC20, a#ERRVEC 
170140 DDC2: LDFPS (RO) 
170205 STFPS R5 
020027 024226 CMP RO, ADDCTP1 
001015 BNE DDC10 
022705 105252 CMP #105252,R5 
001021 BNE DDC11 
000444 BR DDCDONE 
177777 177777 (177777 -1,-1,-1,21 
177777 
177777 DDCTP1: =1 
177777 (177777-«177777 -1,°1,-1,-1 
177777 
012737 024226 001240 DDC10: Mev #DDCTP1, aa#$TMP3 
010037 001242 MOV RO, awSTMP4 
104233 1S: ERROR +233 ;RO BAD BUT FSRC FAILED 
000424 BR DDCDONE | 
012737 105252 001240 DDC11: MOV #105252, aM#$TMP3 ;REPORT FPS INCORRECT. 
010537 001242 MOV RS, aS TMP4 
104234 1$: ERROR +234 
15 BR DDCDONE 
011602 DDC20: MOV (SP) Re 
020227 024176 CMP R2,#DDC2+2 


a Ce CT 


SEQ 0112 
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147 SOURCE MODES, MODE 4 (FL=0), TEST SEQ 0113 







4342 024302 001405 BEQ 1$ 
4343 024304 020227 024200 CMP R2,ADDC2+4 
4344 024310 00140 BEQ 1$ 











4345 024312 000137 046250 JMP a4CPSPUR 
4346 024316 022626 1$: CMP (SP)+, (SP) + 
4347 024320 010237 001236 MOV R2, a#$TMP2 
4348 024324 104235 2$: FRROR +235 :DDD ADRES 
4349 024326 _ DDCDONE : 
024326 104412 RSETUP :GO_INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOFTWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?) 
4350 PTT TIT T ITT ITT TTT TTT ttt titi Ti ttt ti titi i tit itct tt tit tt ttt ttt tite 
=*TEST 50 SOURCE MODES, MODE 3 (FL=0), TEST 






** 
7* THIS IS A TEST OF SOURCE MODE 3 
;* USING THE LDFPS INSTR 












024330 
4351 024332 EEC1: 
024332 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
4352 024334 012700 024436 MOV MEECTP2,RO 
4353 024340 012710 024426 MOV MEECTP1, (RO) 
4354 024344 012767 103456 000054 MOV #103456, EECTP1 
4355 024352 012737 103456 001240 MOV #103456, aASTMP3 z 
4356 024360 012737 024374 001236 MOV MEEC2, @4STMP2 
4357 024366 012/737 024504 000004 MOV WEECOO, @#ERRVECT SET UP FOR TRAPS 10 4. 
4358 024374 170130 EEC2: LDFPS a(RO)+ ;TEST INSTRUCTION. 
4359 024376 170205 STFPS RS ZGET THE FPS. 
4360 024400 020027 024440 CMP RO ,AEECTP2+2 71S RO CORRECT? 
4361 024404 001021 BNE EEC] ;BR IF NOT. 
4362 024406 022705 103456 CMP #103456,R5 :IS aghhong CORRECT? 






4363 024412 001025 BNE EEC11 :BR IF 
one 024414 000450 BR EECDONE 







4367 ; TEST BUFFER AND DATA: 

4368 024416 177777 177777 177777 -1,-1,-1,-1 
024424 177777 

4369 024426 177777 EECTP1: =1 







4370 024430 177777 177777 177777 =1,-1,°1 
4371 024436 024426 177777 177777 EECTP2: EECTP1,-1,-1,-1. 
2 024444 177777 000000 










4374 ; ;REPORT RO INCORRECT. 

4375 024450 012737 024440 001240 EEC10: MOV #EECTP2+2,aa$TMP3 

4376 024456 010037 001242 MOV RO, a#STMP4 

4377 024462 104236 1$: ERROR +236 ;RO BAD BUT FSRC FAILED 
4378 024464 000424 BR E& CDONE 

4380 sREPORT FPS INCORRECT 

4381 024466 


737 103456 001240 EEC11: Mov #103456. QaSTMPS ; :REPORT FPS INCORRECT. 






12 
4382 024474 010 
4383 024500 





SS aa FPI11F FLTG PNT PRT C 


SOURCE MODES, MODE 5 (FL=0), 


4384 024502 
385 


4397 024536 
024536 


4398 


024540 
4399 024542 
024542 
4400 024544 


4412 024626 
4413 
4414 
4415 
4416 024630 


4419 024642 
024650 

4420 

4421 

4422 

4423 024652 

4424 024660 

4425 024664 

4426 024666 


000415 


011602 


024376 
024400 
046250 
001236 


024644 


177777 
177777 


024642 
001242 


MACRO M1111 
TEST 


177776 
024632 
001240 
001236 
000004 


177777 
177777 


001240 


K 9 
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; SEQ 0114 


BR EECDONE 
: TRAP HERE THROUGH VECTOR FOUR. SEE iF THE TRAP WAS DURING 
EXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
ZFAILURE | OTHERWISE GO_TO THE SPURIOUS TRAP TO 4 HANDLING. 


V SP) ,R2 

CMP R2, WEECQ+2 

BEQ 1 

CMP R2,AEECZ+4 

BEQ 1$ 

JMP a4CPSPUR 
1$: CMP (SP)+,(SP)+ 

MOV R2,a4$TMP2 
2$: ERROR +240 ;DDD ADRES 
EECDONE : 

RSETUP 260 INITIALIZE THE FPS AND STACK; AND 


; E S 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


5 LEAR ARERR ARERR ERR EERE ARERR HEEER ERE 


SeTEST 51 SOURCE MODES, MODE 5 (FL=0), TEST 
** 
t* THIS IS A TEST OF SOURCE MODE 5 
:* USING THE LDFPS INSTR 
-* 
Pertti titi it titi titi ti tit titi tititt iti ti ti titi tit tt titi ii tit ttt 
$151: SCOPE 
Cus 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #FFCTP2+2,RO |: SET UP THE TEST DATA BUFFER 
MOV #FFCTP1,-2(RO) 
MOV #45412, aMFFCTP1 
MOV #45412. @ASTMP3 :SAVE DATA IN CASE OF ERROR. 
MOV #FFC1, @ASTMP 
MOV wFF C20, @#ERRVECT ;SET UP FOR TRAPS TO 4. 
FFC2: LDFPS a-(R s TEST INSTRUCTION, 
STFPS RS GET T 


HE FPS. 
CMP RO ,AFFCTP2 31S RO CORRECT? 
0 BR IF 


BNE FFC1 NOT. 

CMP oerees RS SIS THE FPS CORRECT? 
BNE FFC :BR IF NOT. 

BR FF CDONE 


Z TEST BUFFER AND DATA: 
FFCTP1: =1 
FFCTP2: FFC 


1,-1,-1 
FFCTP1,-1,-1,-1 


;RE — A INCORRECT. 
FFC10: wif CIPO a eer: 
MOV RO, a# 
1$: ERROR wae ;RO BAD BUT FSRC FAILED 


BR F F CDONE 


L ° 
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E MODES, MODE 5 (FL=0), SEQ 0115 

4427 
4428 REPORT FPS INCORRECT. 
4429 024670 012737 045412 001240 FFC11: MOV #45412, aM$TMP3 REPORT FPS INCORRECT. 
4430 024676 010537 001242 MOV RS, a#STMP4 
4431 024702 104242 1$: ERROR Hs po 
4432 024704 000415 BR F F CDONE 
4433 ; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
4434 SEXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
4435 ;FAILURE. Sponetiae =| GO_TO THE SPURIOUS TRAP TO 4 HANDLING. 
4436 024706 011602 FFC20: MOV SP) ,R2 
4437 024710 020227 024610 CMP Re. WEF C242 
4438 024714 001405 BEQ 1$ 
4439 024716 020227 024612 CMP RD, MFFC2+4 
4440 024722 001402 BEQ 1$ 
4441 024724 000137 046250 JMP a4 CPSPUR 
4442 024730 022626 1$: CMP (SP)+,(SP)+ 
4443 024732 010237 001236 MOV R2,a4$TMP2 
4444 024736 104243 2$: ERROR +243 ;ODD ADRES 
4445 024740 F F CDONE : 

024740 104412 RSETUP ;GO INITIALIZE THE FPS AND STACK; AND 


sSEE IF THE USER HAS EXPRESSED 

;THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH aden (HAS 
; THE USER TYPED CONTROL G?) 


4446 PTTITITITTILITI TTT ITL Litt LLL LL 
i*TEST 52 SOURCE MODES, MODE 6 (FL=0), TEST 
-* 
:* THIS IS A TEST OF SOURCE MODE 6 
:* USING THE LDFPS INSTR 
*-* 
PETIT TITiititititi iti ti titi titi titi titi tt itiii iit iiii iii iii t itty) 

024742 000004 TST52: SCOPE 
4447 024744 GGC1: 

024744 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
4448 024746 012700 017635 MOV #GGCTP1-5201 say :SET UP THE TEST DATA BUFFER. 
4449 024752 012737 046543 025036 MOV #46543, d4GGCT 
4450 024760 012737 046543 001240 MOV #46543, ors IMPS SAVE DATA IN CASE OF ERROR. 
4451 024766 012737 025004 001236 MOV #GGC2, a#STMP2 
4452 024774 CLR R1 
4453 024776 012737 025124 000004 MOV - #GGC20,aMERRVECT ;SET UP FOR TRAPS TO 4, 

4454 025004 170160 005201 GGC2: LDFPS 5201(RO) ity INSTRUCTION. 
4455 025910 170204 STFPS R4 :GET THE F 
4456 025012 005701 1ST _ TWAS PC CORRECT AFTER EXECUTION? 
4457 025014 001033 BNE GGC25 BR IF 
4458 025016 020027 017635 CMP RO,AGGCTP1-5201 31S 7 CORRECT? 
4459 025022 001012 BNE GGC10 ;BR IF NOT. 
4460 025024 022704 046543 CMP #46543 ,R4 :1S THE FPS CORRECT? 
4461 025030 001016 BNE GGC11 ;BR IF NOT. 
4462 025032 000451 BR GGCDONE 
4463 
4464 
4465 TEST BUFFER AND DATA: 
4466 025034 177777 -1 
4467 025036 177777 177777 177777 GGCIP1: -1,-1,-1,-1 
025044 177777 


4468 025046 177777 -1 
4469 


* eed FP11F FLTG PNT PRT é 


SOURCE MODES, 


7 025066 
4478 025074 
79 025 


4486 025122 


90 025124 


025156 


4500 


025160 
4501 025162 
025162 
4502 025164 


4513 025242 


a] * 
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taal “a 
MODE 6 (FL=0), 
pS ot ~ a INCORRECT. 
012737 017635 001240 GGC10: #GGCTP1- Sal a4$TMP3 
010037 001242 mov RO, a#$TMP 
104244 1$: ERROR +244 ;RO BAD BUT FSRC FAILED 
BR GGCDONE 
;REPORT FPS INCORRECT. 
012737 946543 001240 GGC11: MOV #46543, = ;REPORT FPS INCORRECT. 
010437 001242 MOV R4, ae$TMP 
104245 1$: ERROR +245 
25 BR GGCDONE 
REPORT PC INCORRECT AFTER INSTRUCTION. 
012737 9025010 001240 66025: MOV #GGC2+4, a#$TMP3 
012737 025006 001242 MOV #GGC2+2. aa4$TMP4 
104246 1$: ERROR +246 sPC X 
15 BR GGCDONE 
; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
S EXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
;FAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 
011602 GGC20: MOV SP) ,R2 
020227 025006 CMP RD. HGGC2+2 
001405 BEQ 1$ 
020227 025010 CMP RD, AGGC2+4 
001402 BEQ 1$ 
000137 046250 JMP @4CPSPUR 
022626 1$: CMP (SP)+, (SP)+ 
010237 001236 MOV R2,a4$TMP2 
104247 2$: ERROR +247 ;O0DD ADRES 
GGCDONE : 
104412 RSE TUP 3;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH it (HAS 
: THE USER TYPED CONTROL G?) 
TTI I IIIT TTT TTT TTT TI TTT TTT iti titi tii iii ttt i ttt til 
s*TEST 53 SOURCE MODES, MODE 7 (FL=0), TEST 
** 
3* THIS IS A TEST OF SOURCE MODE 7 
:* USING THE LDFPS INSTR 
*a 
OTST TIT i titi i titi titi titi itt iit i iii t titi titi titi titi titi titi it 
000004 Sit ig SCOPE 
HHC1: 
104413 LPERR ;SET UP THE LOOP ON ERROR ~ Sateen 
012700 020071 Vv #HHCTP2-5201,R0 SET UP THE TEST DATA BUFFER 
2760 025262 005201 MOV #HHCTP1,5201 (RO) 
012737 004547 025262 MOV #4547 , @AHHC 
012737 004547 001240 MOV #4547 ,@ASTMPS zSAVE DATA IN CASE OF ERROR. 
ert 025230 001236 ny! areas 
012737 025356 000004 MOV Sone @#ERRVECT ;SET UP FOR TRAPS TO 4. 
170170 005201 HHC2: LDFPS @5201(RO) s TEST INSTRUCTION. 
170204 STFPS R4 ;GET THE FPS. 
005701 TST R1 ;WAS PC. CORRECT AFTER EXECUTION? 
1036 BNE HHC25 
020027 020071 CMP RO, MHHCTP2-5201 ; 71S i CoaRECT? 


SEQ 0116 


10 
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SOURCE MODES, MODE 2 GR7 (FL=1), TEST SEQ 0118 
£ fe AAAAAAAARAAAAAAAARARAARAAARARARAARARRAAAAARARAARRRHARREARERERREREE 
025412 000004 1$154: SCOPE 
4566 025414 11C1: 
025414 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4567 025416 012737 025442 001236 MOV W11C2,@4$TMP2 SAVE DATA IN CASE OF ERROR. 
4568 025424 012737 025514 000004 MOV #11020 @#ERRVECT. ;SET UP FOR TRAPS TO 4. 
4569 025432 012700 000300 MOV #300,R0 
4570 025436 170100 LDFPS RO 
4371 025440 005001 CLR R1 
4573 025442 177027 11C2:  LDCLD (R7)+,ACO s TEST INSTRUCTION. 
4574 025444 005201 §201 
4575 025446 005201 5201 
4576 025450 005201 5201 
4577 025452 005201 5201 
4579 025454 020127 000003 CMP R1,43 WAS PC CORRECT AFTER EXECUTION? 
4980 025460 001421 BEQ LI CDONE ‘BR IF YES. 
4582 
4583 sREPORT PC INCORRECT AFTER INSTRUCTION. 
4584 025462 012704 025446 11C3: MOV #IIC2+4,R4 
4585 025466 162701 000003 SUB #3,R1 
4586 025472 006301 ASL R1 
4587 025474 160104 SUB R1,R4 
4588 025476 010437 001242 MOV R4. aASTMP4 
4589 025502 012737 025446 001240 MOV #11C2+4, a#STMP3 
4590 025510 104254 1$: ERROR +254 ;BAD CONSTANT 
4591 025512 000404 BR LI CDONE 
4592 ; TRAP HERE THROUGH VECTOR FOUR. SEE IF THE TRAP WAS DURING 
4593 SEXECUTION OF THE FPS INSTRUCTION BEING TESTED. IF SO REPORT 
4594 - ;FAILURE. OTHERWISE GO TO THE SPURIOUS TRAP TO 4 HANDLING. 
4595 025514 011637 001236 11¢20: MOV (SP) ,a#$TMP2 
45% 025520 022626 CMP (SP)+, (SP)+ 
4397 025522 104255 1$: ERROR +255 :BAD CONSTANT ODD ADD 
4599 025524 LI CDONE : 
025524 104412 RSE TUP GO INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO C THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 
4600 
4607 
4608 STARA REAR AERA EERE AEEAEERAEERERAEREAREREERERERRERRE REED 
:*TEST 55 SOURCE MODES, MODE 2 (FL=1), TEST 
ie THIS IS A TEST OF THE LDCLD INSTR 
:* WITH MODE 2. 
é MASBBARASZASZALSZALASLESSAESAASRS SESE REESE RARER ESE RRR RRR RRS RR SEAR RRS SE SS 
’ 025526 000004 $155: SCOPE 
4610 025530 TCC1: 


025530 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4611 025532 016737 000014 001236 MOV TCC2,@aSTMP2 [SAVE DATA IN CASE OF ERROR. 





” “tege FPI1F FLTG PNT PRT C 


000300 
025642 


025652 
000200 


025646 
4623 025576 
4624 


025600 
26 025604 
025612 
025614 


4630 025616 
i 025622 


001242 
025646 


000300 


025624 

025630 
4636 025636 
4637 025640 
4638 


001242 
000300 


067076 
177777 


4658 
4659 025666 
025666 104413 


C10 
MACRO M1111 24=SEP=79 15:03 PAGE 23-12 
SOURCE MODES, MODE 2 (FL=1), TEST 


001240 


054321 
177777 


#300,RO 
RO 


MOV 

LDFPS 

MOV #TCCBF),RO SET UP THE TEST DATA BUFFER. 
LDOCLD = (RO)+,ACO TEST INSTRUCTION. 


STFPS R4 GET THE FPS. 
MOV #TCCBF1,R1 ;GET THE RESULT. 
MOV #200,R2 
LDFPS R 

STD ACO, (R1) 

a RO ,ATCCBFO+4 


TCC3 
RO INCORRECT. 
RO, aS TMP4 
#TCCBFO+4 ,a#STMP3 
+256 ;BAD CONST 
TCCDONE 


#300,R4 ;1S THE FPS CORRECT? 
TCCDONE 


FPS INCORRECT. 

MO R4, BHSTMPS 
#300, a#STMP3 

ERROR +257 

BR TCCDONE 


31S RO CORRECT? 


; TEST BUFFER AND D 
TCCBFO: .WORD o12se. 67076, 54321,012345 


TCCOFIT: <1,<1,<-1,-1 


TCCDONE : 
RSE TUP G0 INITIALIZE THE FPS AND a AND 


CHANGE THE SOF E 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


we SAA e RRR E REE RE RRR RERARARREERRA RARER ARRR RAR RRR RRR RRR RAR ASRS SD | 


stest 56 LDCIF AND LDCLF TEST 


:* THIS IS A TEST OF THE LDCIF AND 
;* THE LDCLF INSTRUCTIONS. 
-* 


MARS AAAAASALASLASASESESARRRR AR RRRA RA RARE RRR RRARAR RRR R RR RRR RASS SDD OD | 


re 


ST56: SCOPE 


ZERO OPERAND FL=0 


KKC1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 


SEQ 0119 





CKFPCAO FP11F FLTG PNT PRT C 


156 


4660 025670 
4661 

4662 025674 
4663 025700 


4671 025724 
4672 

4673 

4674 025724 

025724 

4675 025726 
4676 

4677 025732 


4686 025762 

4687 

4688 

4689 02576< 
025762 

4690 025764 


LOCIF AND LDCLF 


004737 


TEST 

027020 
000000 
000000 
177777 


027029 
177777 
000000 
177400 


027020 


MACRO M1111 


. ty 
24SEP=79 15:03 PAGE 23-13 


JSR PC ,@ALDCF SUB 


.WORD 0,0 

-WORD 0,0 

“WORD =1,=1 

0 

‘ 

ERROR +260 

BR 6S 

ERROR +261 

OPERAND FL=0 

LPERR 

JSR PC, @#LDCF SUB 
0,-1 

“WORD __0,0 

4177,177400 

0 

4 

-1 

ERROR +262 

BR 

ERROR #261 

OPERAND FL=1 

LPERR 


JSR . PC, @4LDCF SUB 


3GO EXECUTE INSTRUCTION. 


FSRC OPE 
SEXPECTED 


RESUL 
ANTICIPATED ERRONEOUS RESULT. 
:FPS BEFORE EXECUTION 

FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 


sFSRC OPERAND. 
SEXPECTED RESUL 


ZANT ICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

ANTICIPATED ERRONEOUS FPS. 


ZINTO 301 


;SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 


SEQ 0120 


CKFPCAQ FP11F 
156 LOCIF 


4692 

4693 025770 
4694 025774 
4695 026000 
4696 026004 


260 
4701 026016 
rea 026020 


03 
4704 026020 
026020 
4705 asense 


4714 026054 
4715 026056 
4716 

4717 acetee 


4728 026114 

4729 

4730 

4731 

4732 026114 
6114 

4733 026116 


4743 026152 
4744 
4765 


FLTG PNT PRT C 


AND LDCLF 


TEST 


027020 
00 


027020 
000000 
000000 
000000 


027020 
000000 
000000 
000000 


24=SEP=79 15:03 PAGE 24 


MACRO M1111 
1$: . WORD 
2$: . WORD 
3$: . WORD 
4$: 100 
104 
4 
5$: ERROR 
ERROR 
6$: 
; OPERAND 
KKC4: 
LPERR 
JSR 
1$: . WORD 
2s: . WORD 
3$: . WORD 
43: 17 
0 
-1 
5$: ERROR 
ERROR 
A Prnmaatn 
LPERR 
JSR 
1$: . WORD 
es: . WORD 
3$: . WORD 
4$: 17 
ms 
5$: —— 
ERROR 
6$: 
; OPERAND= 
C6: 
LPERR 
JSR 
1$: . WORD 
es: . WORD 
3$: . WORD 
4$: 0 
0 
-1 
5$: ERROR 
BR 
ERROR 
6$: 


+260 


6 
+263 7FL WAS 


POSITIVE 


PC, @#LDCF SUB 
40000,0 
4 3600.0 
47600.0 


+261 
FL=0 


—_— 


40200,0 
44200,0 


+264 

6$ 

+261 

PATTERN FL=0 
PC ,@#LDCF SUB 


42052,0 
46052.0 


+264 
6$ 
+261 


; OPERAND==-40000 FL=0 


FSRC_OPERAND. 
SEXPECTED RE SUL 


ANTICIPATED ERRONEOUS RESULT. 


“REPORT RESULT INCORRECT. — 


CLR°ED 
FL=0 


SET UP THE LOOP ON ERROR ADDRESS. 
‘v. EXECUTE THE INSTRUCTION. 
;F SRC OPERAND. 


SEXPECTED RESULT 
:ANTI CIPATED ERRONE QUS RESULT. 
PS BEFORE EXECUTION. 

‘FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
+264 3ST 107 BAD 

$ 4") imma 231 INSD 


SET UP THE LOOP ON ERROR ADDRESS. 
;GO EXECUTE THE INSTRUCTION. 


7FSRC OPERAND. 
SEXPECTED RESUL 


ZANTICIPATED ERRONEOUS RESULT. 
ION. 
;REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 


;SET_UP THE LOOP ON ERROR ADDRESS. 
i EXECUTE THE INSTRUCTION. 


FSRC OPERAND. 
VEXPECTED RESUL 


ANTICIPATED ERRONEOUS RESULT. 


SREPORT RESULT INCORRECT. — 
:REPORT FPS INCORRECT. 


SEQ 0121 


F 10 
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156 LDCIF AND LDCLF TEST SEQ 0122 
4746 026152 KKC7: 
026152 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4747 026154 004737 027020 JSR PC,@#LDCFSUB :GO EXECUTE THE INSTRUCTION. 
4748 026160 140000 060000 1$: “WORD  =40000,0 sFSRC OPERAND. 
4749 026164 143600 000000 2$: “WORD 143600.0 TEXPECTED RESULT. 
4750 026170 043600 000000 3$: “wORD  43600,0 :ANTICIPATED ERRONEOUS RESULT. 
4751 026174 000007 4$: 7 ‘FPS BEFORE EXECUTION. 
4752 026176 000010 10 “FPS AFTER EXECUTION. 
4753 026200 177777 @] S ANTICIPATED ERRONEOUS FPS, 
4754 026202 104265 S$: ERROR +265 7 (SET SIGN) ST 146 
4755 026204 000401 BR 6$ 
4756 026206 104261 ERROR +261 ;REPORT FPS INCORRECT. 
4757 026210 6$: 
4758 
4759 ; OPERAND==-1 FL-0 
4760 026210 KKCB: 
026210 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
4761 026212 004737 027020 JSR PC,@#LDCFSUB :GO EXECUTE THE INSTRUCTION. 
4762 026216 177777 000000 1$: “WORD -1.0 :FSRC OPERAND. 
4763 026222 140200 000000 2$: “WORD  140200,0 SEXPECTED RESULT. 
4764 026226 144000 000400 3$: .~ WORD 144000,400 * ANTICIPATED ERRONEOUS RESULT. 
4765 026232 000000 4$: 0 :FPS BEFORE EXECUTION. 
4766 026234 000010 10 [FPS AFTER EXECUTION 
4767 026236 177777 -] ANTICIPATED ERRONEOUS FPS. 
4768 026240 104266 S$: ERROR +266 372 TO 152 INTO 
4769 026242 000401 BR 6$ Ho (BUF XNBT) 
4770 026244 104261 ERROR +261 “REPORT FPS INCORRECT. 
4771 026246 6$: 
4772 
4773 Z OPERAND=PAT TERN FL=0 
4774 026246 KKC9: 
026246 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4775 026250 004737 027020 JSR PC,a#LDCFSUB G0 EXECUTE THE INSTRUCTION. 
4776 026254 125252 000000 1$: -WORD 125252,0 FSRC OPERAND. 
4777 026260 143652 126000 2$: “WORD  143652.126000 Z EXPECTED RESULT. 
4778 026264 043652 126000 3$: “WORD 43652, 126000 ANTICIPATED ERRONEOUS RESULT. 
4779 026270 000007 4$: ? FPS BEFORE EXECUTION 
4780 026272 000010 10 “FPS AFTER EXECUTION. 
4781 026274 177777 -j TANTICIPATED ERRONEOUS FPS. 
4782 026276 104265 S$: ERROR +265 ZREPORT RESULT INCORRECT. 
4783 026300 000401 BR + 
4784 026302 104261 ERROR +261 :REPORT FPS INCORRECT. 
4785 026304 6$: 
4786 
4787 ; OPERAND POS FL=-1 
4788 026304 ! KKC10 
026304 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4789 026306 004737 027020 JSR PC, a#LDCF SUB :60 EXECUTE THE INSTRUCTION. 
4790 026312 040000 000000 1$: “WORD 40000,0 FSRC OPERAND. 
4791 026316 047600 000000 2$: “WORD 47600.0 “EXPECTED RESULT. 
4792 026322 043600 000000 . 3$: “WORD  43600.0 ‘ANTICIPATED ERRONEOUS RESULT. 
4793 026326 000117 4$: 117 “FPS BEFORE EXECUTION. 
4794 026330 000100 100 “FPS AFTER EXECUTION. 
4795 026332 177777 of ANTICIPATED ERRONEOUS FPS, 
4796 026334 104267 5$ ERROR +267  ;ST 107 CONST 
4797 026336 000401 BR 6$ BAD 33) INST 217 
4798 026340 104261 ERROR +261 ;REPORT FPS INCORRECT. 





G1 
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Alia FPI1F FLTG PNT PRT C MACRO M1111 
156 LDCIF AND LDCLF TEST 
4799 026342 6$: 
4800 
4801 ; OPERAND=1 FL=1 
4802 026342 KKC11: 

026342 104413 LPER ;SET_UP THE LOOP ON ERROR ADDRESS. 
4803 026344 004737 027020 JSR PC ,@4LDCF SUB ‘re EXECUTE THE sachin ite 
4804 026350 0000U1 1$ . WORD 1 FSRC OPERAND. 

5 0263 040200 000000 2$: “WORD 40200,0 SEXPECTED RESUL 
4 026 034200 000000 3$: «WORD  34200,0 ANTICIPATED ERRONEOUS RESULT. 
4807 026364 000100 4$: 100 FPS BEFORE EXECUTION. 
4808 026 000100 100 FPS AFTER EXECUTION. 
4809 026370 177777 -1 sANTICIPATED ERRONEOUS FPS. 
4810 026372 104267 5$ ERROR +267 REPORT RESULT INCORRECT. 
4811 026374 000401 6$ 
4812 026376 104261 ERROR +261 REPORT FPS INCORRECT. 
4813 026400 6$ 
4814 
4815 ; OPERAND= PATTERN FL=1 
4816 026400 KKC le: 

026400 104413 LPER SET UP THE LOOP ON ERROR ADDRESS. 
4817 026402 004737 027020 JSR PC ,@A4LDCF SUB ‘ EXECUTE THE INSTRUCTION. 
4818 026406 000252 1$: -WORD 0,252 FSRC OPERAND. 

4819 026412 042052 000000 2$: «WORD 42052,0 SEXPECTED RE SUL 

4820 026416 036052 000000 3$: -WORD 36052,0 ANTICIPATED ERRONEOUS RESULT. 
4821 026422 000111 4$: 111 PS BEFORE EXECUTION. 

4822 026424 00010 100 EPS AFTER EXECUTION. 

4823 026426 177777 -1 sANTICIPATED ERRONEOUS FPS. 
4824 026430 104267 5$ ERROR +267 REPORT RESULT INCORRECT. 
4825 026432 000401 6$ 

4826 026434 104261 ERROR +261 ;REPORT FPS INCORRECT. 
4827 026436 6$: 

4828 

4829 A | Pcaialiataes 0 FL=1 

4830 026436 kKKC13: 

026436 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
4831 026440 004737 027020 JSR PC ,@#LDCF SUB ;GO EXECUTE THE INSTRUCTION. 
4832 026444 140000 000000 1$: -WORD -40000,0 :FSRC_ OPERAND. 

4833 026450 147600 000000 2$: -WORD 147600,0 EXPECTED RESULT. 
4834 026454 047600 000000 3$: -WORD 47600,0 ANTICIPATED ERRONEOUS RESULT. 
4835 026460 000107 4$: . 107 :FPS BEFORE EXECUTION. 
4836 02 000110 110 FPS AFTER EXECUTION. 
4837 026464 177777 -1 :ANTICIPATED ERRONEOUS FPS. 
4838 026466 104265 5$ ERROR +265 SET SIGN 
4839 026470 000401 6$ 
4840 026472 104261 ERROR +261 REPORT FPS INCORRECT. 
4841 026474 6$: 
4842 
4843 SOPERAND=-1,-1 FL=1 
4844 026474 KKC14: 
026474 104413 LPER SET UP THE LOOP ON ERROR ADDRESS. 
5 026476 004737 027020 JSR PC, ~ pacieilemes He EXECUTE THE INSTRUCTION. 
4846 026502 177777 177777 1$: «WORD -1, 3FSRC OPERAND. 
4847 026506 140200 000000 2$: . WORD 146200,0 sEXPECTED RESULT 
4848 026512 150000 000000 3$: -WORD 150000,0 ANTICIPATED ERRONEOUS RESULT. 
4849 026516 000100 4$: 100 FPS BEFORE ty 3t dB ge 
4850 026520 000110 110 ;FPS AFTER EXECUTION. 
4851 026522 177777 -1 ANTICIPATED ERRONEOUS FPS. 


ps 


SEQ 0123 
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156 
4852 026524 


026570 


026570 


4904 026702 


LDCIF AND LDCLF TEST 


027020 


177776 


027020 
000100 
000001 
000000 


027020 
00 


MACRO M1111 24=SEP=79 15:03 PAGE 2 
S$: ERROR +266 
BR 6$ 
ERROR +261 
6$: 
; OPERAND=PAT TERN FL=1, 
KKC Ci3¢ 
LPERR 
JSR PC, @4LDCF SUB 
1$ “WORD . 125252,125252 
2$ “WORD 147652,125253 
3$ “WORD 47652,125253 
4$ 105 
110 
5$ ERROR +265 
BR 6$ 
ERROR +261 
6$: 
:OPERAND=77777,177500  FL=i. 
KKC16: 
LPERR 
JSR PC, aFLDCF SUB 
1$ “WORD 77777, 197800 
2$ "WORD 47777.177777 
3$ “WORD 47777.177776 
4$ 117 
100 
5$ ERROR +270 
BR 6$ 
ERROR +261 
6$: 
;OPERAND=40000,000100 FL=1, 
KKC17: 
LPERR 
JSR PC, a#LDCF SUB 
1$: “WORD  40000,100 
2$: “WORD  47600.1 
3$: “WORD  47600,0 
4$: 102 
100 
5$ ERROR +270 
BR 6$ 
ERROR +261 
6$: 
;OPERAND=40000,000100 FL=1, 
KKC18: 
LPER 
JSR PC ,@ALDCF SUB 
1$: “WORD  40000,100 
2$: “WORD 47600. 9 
z$: “WORD 47600,17 


SEQ 0124 
; (BUT XNBT) 
REPORT FPS INCORRECT. 


ROUND MODE 


SET UP THE LOOP ON ERROR ADDRESS. 
: GO sae THE INSTRUCTION. 
FSRC OPERAND. 


: EXPECTED RESULT 
ANTICIPATED ERRONEOUS RESULT. 
ZFPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
SANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 


ROUND MODE 


SET UP THE LOOP ON ERROR ADDRESS. 
:G0 oe THE INSTRUCTION. 
FSRC OPERAND. 

SEXPECTED RESUL 

ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE hye th ge 
FPS AFTER EXECUTION. 
ZANTICIPATED ERRONEOUS FPS. 
:ST 631 INTO RND 


;REPORT FPS INCORRECT. 


ROUND MODE 


;SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE THE INSTRUCTION. 
ee 


3F SRC 
;EXPECTED RESUL 
ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 
cFPS AFTER EXECUTION. 
SANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


TRUNC MODE 


SET UP THE LOGP ON CRROR ADDRESS. 
GO Exe cure THE INSTRUCTION, 
RC . oe RAND . 


JEXPECTED. RE SUi 
SANTICIPATED ERRONEOUS RESULT. 


CKFPCAO FPI1F FLTG PNT PRT C 
156 LDCIF AND LDCLF TEST 


4905 026706 


4910 026720 
4911 026722 


4912 
4913 026722 
026722 


006 
027010 
4936 027012 
4937 027014 
4938 027016 
4939 


ar 
oO 





027020 
000000 


000000 
000000 


027020 





I 1 
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SEQ 0125 
4$: 157 3FPS BEFORE EXECUTION. 
140 sFPS AFTER EXECUTION. 
-1 ANTICIPATED ERRONEOUS FPS. 
5$: ae ih T 631 ... INTO TRNC 
6$ ERROR +261 ZREPORT FPS INCORRECT. 
ee (MOST NEG #) FL=0 
KK : 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC ,@4LDCF SUB 360 eat? s THE INSTRUCTION. 
1$: . WORD 100000,0 FSRC OPERAND. 
es: . WORD 144000.0 S EXPECTED RESUL 
3$: . WORD 143600,0 “ANTICIPATED YERONEOUS RESULT. 
S$: 7 sFPS BEF ORE EXECUTION. 
10 sFPS AFTER EXECUTION. 
-1 S ANTICIPATED ERRONEOUS FPS. 
5$: Hi 7ST 630 RH*R1441 
68 ERROR oo61 ;REPORT FPS INCORRECT. 
: OPERAND=100000,0 FL=1 
KKC20: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC,@A4LDCF SUB *GO EXECUTE THE INSTRUCTION. 
1$: WORD 100000 ,0 sFSRC OPERAND. 
2$: . WORD 150000,0 T EXPECTED RESUL 
3$: . WORD 147600,0 T ANTICIPATED UhROME OUS RESULT. 
4$: 107 sFPS BEFORE EXECUTION. 
110 - FPS AFTER EXECUTION. 
-1 Z;ANTICIPATED ERRONEOUS FPS. 
5$: ae il sREPORT RESULT INCORRECT. 
ERROR +261 sREPORT FPS INCORRECT. 
6$: BR KK CDONE 


[THE LDCIF OR LDCLF INSTRUCTION AND CHECK THE RESULTS. A CALL 
:TO IT IS MADE THUS: 


JSR PC ,@ALDCF SUB 
ACARG: .WORD X,X ;AC_OPERAND 


; RES: «WORD X,X EXPECTED -} 

; ERRES: .WORD X,X SERROR RESUL 
FPSB: «WORD =X FPS BEFORE EXECUTION 
FPSA: «WORD xX FPS AFTER EXECUTION 
ERFPS: .WORD  X TERROR FPS 
ERR1: ERROR +X ;DATA ERROR 

: BR CONT 

: ERR2: ERROR +X FPS ERROR 

1 CONT: [RETURN ADDRESS 


THE OPERANDS ARE SET UP (USI 
THE LDCIF OR LDCLF INSTRUCTI 
THE RESULT IS CHECKED AGAINS 
; COMPARED WITH FPSA IF THIS T 


3 THIS SUBROUTINE, LDCFSUB, IS USED TO SET UP THE OPERANDS, EXECUTE 


Se ee, THEN 
RES. IF THE RESUL? IS CORRECT THEN THE FPS [5 
S CORRECT LDCFSUB RETURNS CONTROL 


NG 
ON 
T 

00 


cy 





CKFPCAO FPIIF FLTG PNT PRT C 


156 


LOCIF 


027020 


027140 
027144 
027146 


027152 


027176 
3 


4 
027202 
6 


174010 
012702 


012702 
010100 
062700 
012703 
022022 
001003 
077303 
000161 


AND LDCLF TEST 


000014 
027040 


027224 
000200 


027224 


000016 
000030 


027224 


000010 
000002 


000022 


J 10 
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001236 


001252 


;TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD LDCFSUB WILL 
;COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN LDCFSUB WILL RETURN 

;TO THE ERROR CALL AT ERR2, OTHERWISE LDCFSUB ITSELF 

;REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 
;LDCIF OR LDCLF IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

; THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN LDCF SUB 

;WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND LDCF SUB 

REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


LDCF SUB: MOV (SP)+,R1 ;GET A POINTER TO THE ARGUMENTS. 
MOV 14(R1) ,RO :SET THE FPS. 
LDFPS RO 
MOV #1$,a4#$TMP2 
MOV R1,RO 

1$: LDCIF (RO) ,ACO TEST INSTRUCTION LDCIF OR LDCLF. 
STFPS R4 GET FPS. 
MOV #LDCT,RO GET THE RESULT. 


MOV #200,R2 
c 
STD ACO, (RU) 


MOV ALDCT,R2 SEE IF THE RESULT WAS CORRECT. 
MOV ~ i aa TMP, 


r- 
i=) 
mal 
v 
n 
x 


MOV RL. aASTMP7 
MOV 16(R1), rrsTPi0 
MOV R1.RO 
ADD #4-RO 
MOV #2.R3 
2$: CMP (RO) +, (R2)+ 
_ BNE 10$ :BR IF INCORRECT. 
SOB R3,2$ 
CMP 16(R1) RS :SEE IF THE FPS WAS CORRECT. 
BNE 15$ ‘BR IF INCORRECT. 
3$: IMP 30(R1) ‘RETURN, 
:RESULT IN CORRECT SO SEE IF THE FAILURE WAS ANTICIPATED. 
10$: MOV #LDCT.R2 
MOV 1.RO 
ADD #10,R0 
MOV #2,R3 
11$: CMP (RO) +, (R2)+ 
BNE 13$ 


SOB R3,11$ 
JMP 22(R1) 


‘Son FAILURE WAS NOT ANTICIPATED SO REPORT THE ERROR HERE. 


SEQ 6126 


CKFPCAO FP11F FLTG ONT PRT C 
LDCIF AND LDCLF TEST 


156 


5017 027202 
5018 027204 
5019 
5024 027214 
5025 


5026 
$027 027220 
5028 027220 
5029 027222 
5030 


5031 

5032 027224 
027232 

5033 

5034 027234 
027234 


5035 


U 
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14$: ERROR +260 :BAD RES 
BR 3$ 
:THE FPS WAS INCORRECT SO SEE IF IT WAS ANTICIPATED. 
000020 i5$: CMP 20(R1) ,R4 
BNE 16$ 
000026 JMP 26(R1) 
ZFS ERROR NOT ANTICIPATED SO REPORT IT HERE. 
17$: ERROR +261 sBAD FPS 
BR 3$ 
:DATA BUFFER: 
000000 000000 ipcT: .WORD 0,0.0,0 
KKCDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS EXPRESSED 

3 THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
3; THE USER TYPED CONTROL G?). 


SEQ 0127 


= FP11F FLTG PNT PRT C 
TS LDCIF AND LDCLF TEST 


5042 
5043 


027236 
027240 


508 
5082 027420 
5083 027422 


030036 
000000 
000000 


177777 


030036 
177777 
000000 


177400 


030036 
000000 
000000 
177777 


MACRO M1111 


000000 
177777 


000000 
000000 


000000 
177777 


—MmeAARAARAAARRARAAALALASLARARS SLES ESSER A REE E RRS RRR RRR RSE SERRE RS REE 


LDCID AND LDCLD TEST 
s@ 
:* THIS IS A TEST OF LDCID AND LDCLD 
-* 


REE REAAEEAEAE REE REREREKEEERREEEAREERREEEEER ER AEAAEREERERREEREA RR EE 


TRTES 


L 10 
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T 57 


18157: SCOPE 
a 
" — LPERR 
JSR 
1$: . WORD 
2$: .~WORD 
3$: . WORD 
4$:- 213 
5$: ERROR 
ERROR 
6$: 
; OPERAND=0 
LLCe: 
LPERR 
JSR 
1$: . WORD 
2s: . WORD 
3$: . WORD 
4$: 200 
a's 
5$: ERROR 
ERROR 
6$: 
— 
"  LPERR 
JSR 
1$: WORD 
23: .~ WORD 
3$: . WORD 
4$: 211 
204 
5$: ERROR 
ERROR 


FL=0, FD=1 


PC ,a4LDCDSUB 
0.0 
0.0.0.0 


“1.91.73 .>1 ere 


PC .@ALDCDSUB 
0;0,0.0 


4177,177400,0,0 


PC ,@wLDCDSUB 
0:0.0.0 


-1,-1,-1,-1 | 


+273 
6$ 
+274 


SET UP THE LOOP ON ERROR ADDRESS. 






SEQ 0128 


;SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE THE Por Ee. 

:FSRC OPERAND. 

EXPECTED RESULT.’ 


ANTICIPATED ERRONEOUS RESULT. 
7FPS BEFORE aay Ne ogg 
sFPS AFTER EXECUTION 
ZANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


sREPORT FPS INCORRECT. 


SET _UP THE LOOP ON ERROR ADDRESS. 
:GO gd ig INSTRUCTION. 

:FSRC OPERAN 

EXPECTED RESULT. 


ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE oy oe kage 

;FPS AFTER EXECUTION 
ANTICIPATED ERRONEOUS FPS. 
> (BUT FL)S+277 

;TO 300 INTO 301 

;REPORT FPS INCORRECT. 


:GO EXECUTE THE INSTRUCTION. 
:FSRC OPERAND. 
SEXPECTED RESULT. 


ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE ty he pf kg 
FPS AFTER EXECUTION. 
SANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


M 10 
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157 LDCID AND LDCLD TEST SEQ 0129 
5085 ; OPERAND=40000 
5086 027422 ics: * 
027422 ;SET UP THE LOOP ON ERROR ADDRESS. 
5087 027424 004737 030036 PC ,@#LDCDSUB ;GO EXECUTE THE INSTRUCTION. 
5088 027430 040000 000000 i$: . 6 . ;FSRC OPERAND. 
5089 027434 000000 : . 43600,0.0,0 EXPECTED RESULT. 
027442 000000 
5090 027444 000000 : . 47600,0,0,0 ANTICIPATED ERRONEOUS RESULT. 
027452 000000 
5091 027454 4$: FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
sANTICIPATED ERRONEOUS FPS. 
5$: Ha 3ST 107 BAD CONST 


REPORT FPS INCORRECT. 


5095 027464 
5096 027466 

5097 027470 6$: 
5098 


5099 ; OPERAND=-40000 
5100 027470 LLCS: 
027470 SET UP THE LOOP ON ERROR ADDRESS. 
5101 027472 004737 PC ,@#LDCDSUB :GO EXECUTE THE INSTRUCTION. 
5102 027476 000000 : “ -4 ° :FSRC OPERAND. 
5103 027502 60000 3 . 143600,0.0,0 EXPECTED RESULT. 
027510 000000 
5104 027512 : . 43600.0,0,0 sANTICIPATED ERRONEOUS RESULT. 
027520 000000 
5105 027522 : FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
(SET SIGN) ST 176 


;REPORT FPS INCORRECT. 


FL=1 FD=1 


SET UP THE LOOP ON ERROR ADDRESS. 
PC ,a@#LDCDSUB 3GO EXECUTE THE INSTRUCTION. 
40 ;FSRC OP 


1$: . ° ; ERAND. 

2$: . 47600,0,0.0 EXPECTED RESULT. 

3$: ° 43600.0,0.0 ANTICIPATED ERRONEOUS RESUL7. 
:FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 

5$: a 3ST 107 BAD CONS 


REPORT FPS INCORRECT. 


—_— at 4 — — ot oe Ls 
oOo NOU FWH-O 
oo 


Oo 


6$: 
; OPERAND=0,1 
LLC?: 


LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
027606 JSR PC ,@#LDCDSUB :GO EXECUTE THE INSTRUCTION, 
027612 1$: -WORD 0,1 ERAND. 


SB BNRRRAGLS 
oOo 


sFSRC OP 








_ FP11F FLTG PNT PRT C 


LDCID AND LDCLD TEST 


5131 027616 
027624 

5132 027626 
7634 


5141 
5142 027652 
652 


0276 
as 027654 
5144 027660 
5145 027664 
027672 
5146 027674 
027702 
5147 027704 


5153 027720 
54 


5155 

5156 

5157 027720 
027720 

5158 027722 


5159 027726 
5160 027732 
027740 


5161 027742 
50 


MAMAN 


027766 
5172 027770 
5173 027774 
5174 030000 
030006 
5175 030010 


5176 030020 


000000 
000000 


040200 
000000 
034200 
000000 


030036 
177777 
177777 


177777 


104413 
004767 000110 
177777 =177526 
142052 000000 
136052 000000 
000307 
000310 
Legh 

01 
104274 
104413 
004767 000042 
012345 067012 
047247 025560 


177777 


MACRO M1111 
000000 28: 
000000 3$: 
4$: 
5$: 
6$: 


N 1 
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40200.0,0,0 
34200,0.0,0 


+300 
6$ 
+274 


sOPERAND=77777,177777 ~=~FL=1 
LLC8: 


47777, 175599, 177000,0 


LPERR 
JSR PC a#LDCDSUB 
1$: “WORD  77777,177777 
177000 2$: “WORD 
177777 38: .WORD  =1,-1,-1,-1 
4$: 317 
300 
S$: ERROR +273 
6$ 
ERROR +274 
6$: 
: OPERAND=-PAT TERN FL=1 
LLC9: 
LPERR 
JSR PC .LDCDSUB 
1$: .WORD -1.- 
000000 28: “WORD  142052,0.0.0 


000000 38: .WORD  136052,0,0.0 
4$: 307 
310 
5$: ERROR +300 
ERROR +274 
6$: 
: OPERAND=PAT TERN FL=1 
LLC10: 
LPERR 
JSR PC, LDCDSUB 
1$: “WORD 12345, 
050000 2$: “WORD 


177777 =3$: 


67012 
19347" 025560.050000.0 


-1,-1,°1,°1 





EXPECTED RESULT. 


ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
sANTICIPATED ERRONEOUS FPS. 
REPORT FPS INCORRECT. 


REPORT FPS INCORRECT. 


FD=1 


SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE THE INSTRUCTION. 


Z OPERAND. 
;EXPECTED RESULT. 


;ANTICIPATED ERRONEOUS RESULT. 


:FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 
sANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 
FD=1 


:SET UP THE LOOP ON ERROR ADDRESS. 
pb Rag EU: THE INSTRUCTION. 


RAND. 
EXPECTED RESULT. 


ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE tote pty 

FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 
REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


FD=1 FT=1 


;SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE gy Mel ee 


: ERAND 
EXPECTED RESULT. 


ANTICIPATED ERRONEOUS RESULT. 


sFPS BEFORE EXECUTION. 


SEQ 0130 | 
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157 LDCID AND LDCLD TEST SEQ 0131 
5177 030022 000340 340 sFPS AFTER EXECUTION. 
$178 030024 177777 =i TANTICIPATED ERRONEOUS FPS. 
5179 0 104273 S$: ERROR +273 SREPORT RESULT INCORRECT. 
5180 0 000401 BR 6$ 
5181 030032 104274 ERROR +274 ;REPORT FPS INCORRECT. 
2182 030034 000502 6$: BR LLCDONE 
5184 ; THIS SUBROUTINE, LDCDSUB, IS USED TO SEY UP THE OPERANDS, EXECUTE 
5185 THE Ph 2° OR LDCLD INSTRUCTION AND CHECK THE RESULTS. A CALL 
5186 TO IT IS MADE THUS: 
5187 : 
5188 JSR PC ,@4LDCDSUB 
5189 : ACARG: .WORD xx ;AC OPERAND 
5190 RES: ~ WORD XMLX,X sEXPECTED RESULT 
5191 ; ERRES: .WORD KX sERROR RESULT 
5192 FPSB: ~ WORD x sFPS BEFORE EXECUTION 
5193 : FPSA: «WORD x FPS S ihe EXECUTION 
5194 : ERFPS: .WORD x TERROR F 
5195 : ERR1: ERROR +X “DATA ERROR. 
5196 ; BR CONT 
5197 ° ERR2: ERROR +X 3FPS ERROR. 
1s ; CONT: sRETURN ADDRESS 
5200 * THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
$201 714 LDCID OR LDCLD INSTRUCTION IS EXECUTED. 
5202 [THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
5203 ; COMPARED WITH FPSA IF THIS TOO IS CORRECT LDCDSUB yy bay CONTR 
5204 ;TO THE wim Y ROUTINE AT ek 7” THE FPS IS BAD LDCDSUB 
5205 ; COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN one WILL RETURN 
5206 -TO THE ERROR CALL AT ERR2, OTHERWISE LDCDSUB ITSELF 
5207 SREPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 
5208 [LDCID OR LDCLD IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
5209 “ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 
5210 [THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN LDCDSUB 
5211 WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 
5212 sRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND LDCDSUB WILL 
a ;REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 
5215 030036 012601 LDCDSUB: (SP)+,R1 ;GET A POINTER TO THE ARGUMENTS. 
$216 030040 016100 000024 MOV BOCRI). RO sSET THE FPS. 
5217 030044 170100 LDFPS R 
5218 030046 012737 030056 001236 MOV #1$,a#STMP2 
5219 030054 010100 MOV R1.RO 
220 030056 177010 1$: LDCID (RO) ACO TEST INSTRUCTION, LDCID OR LDCLD. 
5222 030060 170204 STFPS RG :GET FPS. 
$223 030062 012700 027224 MOV #LDCT,RO ‘GET THE RESULT. 
030066 012702 000200 MOV #200,R2 
$225 030072 170102 LDFPS R 
2656 030074 174010 STD ACO, (RO) 
5228 SSEE IF THE RESULT IS CORRECT. 
5229 030076 012702 027224 MOV #LDCT Re 
5230 030102 010237 001242 MOV R2, ahSTMP4 
5231 030106 010137 001240 MOV R1.a#$TMP3 
5232 030112 010103 MOV R1_R 
5233 030114 062703 000004 ADD #4 °R3 
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157 LOCID AND LDCLD TEST SEQ 0132 


5234 030120 001244 R3,Q4STMP5 
5235 030124 0437 001250 R4 ,a#STMP7 
000026 oe 


#4-RO 
#2.R3 
(RO) +, (R2)+ 
10$ 

R3,2$ 


000026 26(R1) ,R4 31S THE sis CORRECT? 
15$ ;BR_IF INCORRECT 
000040 3$: 40(R1) RETURN. 


; THE RESULT INCORRECT SO SEE IF THE ERROR WAS ANTICIPATED. 
027224 108: MOV MLDCT,R2 
R1,RO 
000014 #14,R0 


000002 #2,R3 
11$: (RO) +, (R2)+ 
13$ 


R3,11$ 
000032 138: 32(R1) 
;ERROR NOT ANTICIPATED SO REPORT RESULT INCORRECT HERE. 
14$: ny OR “= ;BAD RES 


000004 
000002 
;BR IF INCORRECT. 


;THE FPS WAS INCORRECT. SEE IF FAILURE WAS ANTICIPATED. 
15$: CMP 30(R1) ,R4 

BNE 

JMP 36(R1) 
ica ERROR WAS NOT ANTICIPATED SO REPORT FAILURE HERE. 


17$: ERROR +274 ;BAD FPS 
BR 3$ 


LLCDONE : 
104412 RSE TUP :G0 INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
: THE DESIRE TO CHANGE THE SOF TWARE 
‘VIRTUAL CONSOLE SWITCH hata (HAS 
: THE USER TYPED CONTROL G?) 


MAAR aSAA RASA SASARALASAASAALARSLRSERAASLASARRRRR SARA RRR AR RAS SSDS DO | 


: TEST 60 LDEXP TEST 


ie THIS IS A TEST OF THE LDEXP ya 

& A SUBROUTINE IS USED TO SET 

:* OPERANDS, EXECUTE THE LDEXP INST AND 
:* CHECK THE RESULTS. 

°@ 


MADARA SRASLASLAALASZASSAALARSAASSASARA RE SRRR RR RRA RR RR RR RR RRR RRR RR SSR SS OG 


030244 000004 75160: SCOPE 





D171 
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T60—s LDEXP TEST SEQ 0133 
5285 ; NON-ZERO RES. VALID EXPON=210 (EXCESS 200)=10 
5286 030246 mC 1 : 
030246 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
5287 030250 004767 001334 JSR LDXSUB “GO EXECUTE THE INSTRUCTION. 
5288 030254 012345 067012 034567 18: 19805-67012, 34569 019565 ;ACO OPERAND. 
030262 012345 
5289 030264 000010 23: .WORD 10 EXPONENT OPERAND. 
5290 030266 042149 067012 034567 38: "WORD 42145,67012,34567,012545 EXPECTED RESULT. 
5291 030876 002145 067012 034567 48: WORD  2145,,67012, 34567,012345 ANTICIPATED ERRONEOUS RESULT. 
5292 030306 047217 5$: 47217 FPS BEFORE EXECUTION. 
5293 030310 047200 47200 FPS AFTER EXECUTION. 
5294 030312 147200 147200 ANTICIPATED ERRONEOUS FPS. 
5295 030314 177777 ~ EXPECTED FEC. 
5296 030316 104304 6$: ERROR +304 £12+612+200 BAD 
5297 030320 00 7$ 624 
5298 030322 104305 7$: ERROR +305 ;REPORT FPS INCORRECT. 
5299 3ST 625 INTO 304 
5300 NON-ZERO RES —NEG. 
5301 030324 ; 
030324 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
5302 030326 004737 031610 JSR PON=377 
5303 030332 123456 970123 045670 1S: WORD 198456.70123, seit 123456 ACO OPERAND. 
030340 123456 
030342 000177 28: .WORD 177 XPONENT OPERAND. 
5305 050544 177656 070123 045670 38: "WORD 177656,70123,45690. 125456 EXPECTED RESULT. 
5306 030354 137656 070123 045670 48: WORD 137656, 70123,45670, 123456 ANTICIPATED ERRONEOUS RESULT. 
5307 030364 047207 5$: 47207 :FPS BEFORE EXECUTION. 
5308 030366 047210 47210 FPS AFTER EXECUTION 
5309 030370 147210 147210 ANTICIPATED ERRONEOUS FPS. 
5310 030372 177777 -1 : EXPECTED FEC. 
5311 030374 104304 6$: ERROR +304 REPORT RESULT INCORRECT. 
5312 030376 000401 7$ 
5313 030400 104305 ERROR +305 ;REPORT FPS INCORRECT. 
931% 050402 7$: 
5316 NON-ZERO RES,  EXP=256=(56)REAL 
5317 030402 3: 
030402 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
5318 030404 004737 031610 JSR XSUB O EXECUTE THE INSTRUCTION. 
5319 030410 075261 057645 043323 18: 'BORD 73361057665, 43353, 101760 ACO OPERAND. 
5320 030420 56 28: .WORD 56 EXPONENT OPERAND. 
5321 050422 055461 057645 043323 38: "WORD $3461,057645,43323. 101760 EXPECTED RESULT. 
5322 030432 177777 177777 177777 48: .WORD =1,-1,-1,-1 ANTICIPATED ERRONEOUS RESUL!. 
030440 177777 7 
5323 030442 047200 5$: 47200 EPS BEFORE EXECUTION. 
5324 030444 047200 47200 FPS AFTER EXECUTION. 
5325 030446 147200 147200 ANTICIPATED ERRONEOUS FPS. 
5326 030450 177777 -1 sExPECTED FEC. 
5327 030452 104301 6$: ERROR +301 REPORT RESULT INCORRECT. 
5328 030454 000401 7$ 
5329 030456 104305 ERROR +305 ;REPORT FPS INCORRECT. 
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LDEXP TEST SEQ 0136 
oeer C30460 7$: 
5332 sEXP=27 (EXCESS 200)=-151 (OCT) 
5333 030460 MMC4: 
030460 104413 LPERR = - THE LOOP ON ERROR ADDRESS. 
5334 030462 004737 031610 JSR PC ,aAL EXECUTE THE INSTRUCTION. 
5335 ena 634555 024252 062720 1$: -WORD 12223, 30352, s2rab® 31535 ;ACO OPERAND. 
5336 030476 177627 2$: “WORD =151 EXPONENT OPERAND. 
5337 Beoshe 093663 024252 042720 3$: -WORD 5623,24252, 62720" S132) EXPECTED RESULT. 
5338 Omai0 tah A 177777 177777 4$: MORD = =1,°1,°1,°1 ANTICIPATED ERRONEOUS RESULT. 
5339 030520 047200 5$: 47200 FPS BEFORE EXECUTION. 
5340 0305e2 047200 47200 FPS AFTER EXECUTION. 
5341 030524 147200 147200 sANTICIPATED ERRONEOUS FPS. 
5342 030526 177777 “7 EXPECTED FEC. 
5343 030530 104301 6$: ERROR +301 ;REPORT RESULT INCORRECT. 
5344 030532 000401 BR 7$ 
5345 030534 104306 ERROR +306 ; (BUT EZBT) ST 544 TO 504 INTO 704 O (BUT EXBT) ST 704 INTO 
ene 030536 7$: 
5348 sEXP=0 (EXCESS 200)=-200 (OCT), POSITIVE FRAC 
5349 3 FIV=1 
$350 030536 C3: 
030536 104413 LPERR o> UP THE LOOP ON ERROR ADDRESS. 
5351 030540 004737 031610 JSR EXECUTE THE INSTRUCTION. 
5352 Ospess Beene 032334 035363 1$: . WORD 50131, athe 35368. 73051 :ACO OPERAND. 
5353 030554 177600 2s: -WORD -200 ;EXPONENT OPERAND. 
5354 Benes yee 032334 035363 3$: -WORD 00131, 32334,35363, 73031 EXPECTED RESULT. 
5355 030566 000000 000000 000000 4$: -WORD 0,0,0,0 ANTICIPATED ERRONEOUS RESULi. 
030574 000000 
5356 030576 042200 5$: 42200 FPS BEFORE aye fe 
5357 030600 142204 142204 FPS AFTER EXECUTION. 
5358 030602 042202 42202 ANTICIPATED ERRONEOUS FPS. 
5359 030604 000012 12 SEXPECTED FEC 
5360 030606 104307 6$: ERROR +307 ; (BUT EXBT) ST 704 TO 64 INST 264 
5361 030610 000401 . BR 7$ 
5362 030612 104310 ERROR +310 3 (BUT FIU) ST 264 xX 
5363 030614 7$ 
365 sEXP=0 (EXCESS 200)=-200 (OCT), NEG FRACT,FIU=1 
5366 030614 MMC6: 
030614 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
5367 030616 004737 031610 JSR C.F ;GO_EXECUTE THE INSTRUCTION. 
030622 140414 024344 045464 1$: - WORD Nabe 16, Mees, 45464, 74045 3;ACO OPERAND. 
030630 074045 
5 030632 177600 2s: -WORD -200 EXPONENT OPERAND. ; 
5370 Benes ches 024344 045464 3$: -WORD 100014,24344, 45464, 74045 370 EXPECTED RESULT. 
5371 030644 000000 000000 000000 4$: -WORD 0,0,0,0 ZANTICIPATED ERRONEOUS RESULT. 
030652 000000 
5372 030654 042200 5$: 42200 :FPS BEFORE ere CUT TOs. 
5373 030656 142214 142214 FPS AFTER EXECUTION. 
5374 030660 042214 42214 SANTICIPATED ERRONEOUS FPS, 









> Sa FPIIF FLTG PNT 
LDEXP TEST 


5375 030662 


5412 031026 
5413 
5414 031026 
031026 
5415 031030 
5416 031034 
031042 
5417 031044 
5418 031046 


031054 
5419 931056 
031064 


F 14 
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5$: - 42200 :FPS BEFORE EXECUTION. 
142200. [FPS AFTER EXECUTION. 
42204 ‘ANTICIPATED ERRONEOUS FPS. 
12 sEXPECTED FEC. 
6$: ERROR 312 : (BUT EZBT) ST 544 TO 704 INTO 504 
< ERROR +302 :REPORT FPS INCORRECT. 
gEXP=-17416 (EXCESS 200)=-17616 (OCT), FIU=0 
" LPERR SET UP THE LOOP ON ERROR ADDRESS. 
JSR O EXECUTE THE INSTRUCTION. 
1$: . WORD aioe 37075, anit 17273 :ACO OPERAND. 
2$: .WORD 17616 : EXPONENT OPERAND. 
000000 3$: “WORD 0,0,0,0 ;EXPECTED RESULT. 


076777 4$: 


, nt Cae © 


SEQ 0135 
12 ZEXPECTED FEC. 
6$: ERROR +307 ;REPORT RESULT INCORRECT. 
- ERROR +310 :REPORT FPS INCORRECT. 
ZEXP=0 (EXCESS 200)==200 (OCT).POS FRAC, FIU=0 
MMC 7: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC, @#LDXSUB ‘GO EXECUTE THE INSTRUCTION. 
1$: “WORD 51525, 35455,5675.05152 :ACO OPERAND. 
2$: .WORD  =200 :EXPONENT OPERAND. 
3$: “WORD 0,0,0.0 ;EXPECTED RESULT. 
4$: -WORD 00125, 35455,5675,05152 ZANTICIPATED ERRONEOUS RESULT. 
45200 . :FPS BEFORE EXECUTION. 
45204 [FPS AFTER EXECUTION. 
145204 “ANTICIPATED ERRONEOUS FPS. 
o} :EXPECTED FEC. 
6$: ERROR +311 : (BUT FIU) ST 264 x :REPORT RESULT INCORRECT. 
“a ERROR +302 :REPORT FPS INCORRECT. 
ZEXP=-1405 (EXCESS 200)=-1605 (OCT), FIU=1 
" LPERR :SET UP THE LOOP GN ERROR ADDRESS. 
JSR PC, a#LDXSUB O EXECUTE THE INSTRUCTION: 
1$: -WORD  61626,62636, 46566, 087606 ;ACO OPERAND. 
2$: .WORD  -1605 EXPONENT OPERAND. 
3s: “WORD 76626 62636, 46568, 67606 sEXPECTED RESULT. 
4$: .WORD 0,0,0.0 : ANTICIPATED ERRONEOUS RESULT. 


































76527, 37475,76777,17273 





ZANTICIPATED ERRONEOUS RESUL”. 

























5420 031066 
5421 031070 


ore 4 031162 


5 
5446 031162 
031162 
5447 031164 
5448 031170 
031176 
5449 031200 
5450 031202 
031210 
5451 031212 
031220 
5452 O31554 





5459 031240 
5460 






5461 

5462 031240 
031240 

5463 031242 

5464 031246 
031254 


5465 031256 
5466 031260 
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LDEXP TEST 5€0 0136 
045200 S$: 45200 :FPS BEFORE EXECUTION. 
045204 45204 “FPS AFTER EXECUTION. 
145200 145200 TANTICIPATED ERRONEOUS FPS. 
177777 -1 SEXPECTED FEC. 
10431 68: ERROR +313 : (BUT FIU) ST 504 
000401 BR 7$ 
104302 a ERROR +302 :REPORT FPS INCORRECT. 
sfxP=-1601 (EXCESS 200)==2001 (OCT), FIU=1 
104413 "  LPERR :SET, uP THE LOOP ON ERROR ADDRESS. 
004737 031610 JSR ECUTE THE INSTRUCTION. 
901020 030405 006070 1$: WORD 07620- Bb208, 06070, oB010D ZACO OPERAND. 
175777 2$: .WORD 2001 XPONENT OPERAND. 
037600 030405 006070 3$: "WORD 37620, 30405, 06076" 09102 ZEXPECTED RESULT. 
900000 000000 000000 4$: .WORD 0,0,0,0 : ANTICIPATED ERRONEOUS RESULT. 
042200 S$: 42200 :FPS BEFORE EXECUTION. 
142200 142200 “FPS AFTER EXECUTION. 
042204 42204 SANTICIPATED ERRONEOUS FPS. 
000012 12 SEXPECTED FEC. 
104312 6$: ERROR +312 : (BUT FIU) ST 504 
000401 BR 7$ . 
104302 a ERROR +302 :REPORT FPS INCORRECT. 
z£xP-1206 (EXCESS 200)=1006 (OCT) FIV =1 
104413 "  LPERR :SET UP THt LOOP ON ERROR ADDRESS. 
004737 031610 JSR PC, a#LDXSUB EXECUTE THE INSTRUCTION. 
012131 014151 016171 1$: “WORD: 13131.16151.16174, SEE [ACO OPERAND. 
001006 2$: .WORD 1006 EXPONENT OPERAND. 
041551 014151 016171 3$: “WORD 41531,16151,16171.10111 7EXPECTED RESULT. 
000000 000000 000000 4s: .WORD 0,0,0,0 :ANTICIPATED ERRONEOUS RESULT. 






000000 
041200 5$: 








41200 FPS BEFORE EXECUTION. 
141202 141202 3FPS AFTER EXECUTION 
1204 41204 ZANTICIPATED ERRONEOUS FPS. 
000010 10 SEXPECTED FEC. 
edge 6$: ERROR A ; (BUT FIV) ST 104 







00040 BR 7 
104302 - ERROR +302 REPORT FPS INCORRECT. 









ifxh5 16315 (EXCESS 200)=16115 (OCT) FIV=0 
104413 "  LPERR :SET, uP THE LOOP ON ERROR ADDRESS. 
004737 031616 JSR ECUTE THE INSTRUCTION, 
027262 025242 023222 1$: WORD Sree eres 23225° 91505 7ACO OPERAND. 
016115 2$: .WORD 16115 = EXPONENT OPERAND. 
000000 000000 000000 3%$: 0.0.0.0 sEXPECTED RESULT. 











CKFPCAO FPIIF FLTG PNT 
160 LDEXP TEST 


5492 031374 


5496 031374 


+344 031452 


5512 
5513 031452 


sages 


MAO 


PRT C 


MACRO M1111 


025242 023222 4$: 


031610 
032333 


032333 
000000 


031610 
042434 


000000 
0424 34 


034353 


034353 
000000 


044454 


000000 
044454 


5$: 


6$- 


7$: 
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«WORD  63262,25242,23222,21202 


46200 FPS BEFORE ep ie al sy 
46206 sFPS AFTER EXECUTION. 
146202 SANTICIPATED ERRONEOUS FPS. 
-1 SEXPECTED FEC 

as i ;(BUT FIV) ST 104 

ERROR 302 REPORT FPS INCORRECT. 


sEMP=11011 (EXCESS 200)=10671 (OCT) FIV=1 


mC 13: 


1$: 
2e$: 
3$: 
4$: 
5$: 


6$: 


7$: 


LPERR :SET ee THE LOOP ON ERROR ADDRESS. 
JSR ECUTE THE INSTRUCTION. 

WORD 508T8- Be3s, 34355 S808 ;ACO OPERAND. 

.WORD 1061 EXPONENT OPERAND. 

“WORD 3395. 32333, 34353, 36373 sEXPECTED RESULT. 
.WORD 0,0,9.0 :ANTICIPATED ERRONEOUS RESULT: 
41200 :FPS BEFORE EXECUTION. 

141202 ‘FPS AFTER EXECUTION. 

41204 TANTICIPATED ERRONEOUS FPS. 

10 SEXPECTED FEC. 

ERROR +316 3; (BUT FIV) ST 144 

BR 7$ 

ERROR +302 ZREPORT FPS INCORRECT. 


sEMP=17123 (EXCESS 200)=16723 (OCT) FIV=0 


MMC 14: 


LPERR 2 UP THE LOOP ON ERROR ADDRESS. 
JSR PC ,@4LD O EXECUTE THE INSTRUCTION. 

. WORD 40414, uke. 46454, wire) ;ACO OPERAND. 

. WORD 16723 s EXPONENT OPERAND. 

-WORD 0.0.0.0 sEXPECTED RESULT. 

. WORD 24616 42434 44654 , 46474 ZANTICIPATED ERRONEOUS RESULT. 
46200 sFPS BEFORE EXECUTION. 

46206 FPS AFTER EXECUTION. 

146202 sANTICIPATED ERRONEOUS FPS. 

-1 SE XPECTED FEC. 

ERROR +317 ; (BUT FIV) ST 144 

BR 7$ 

ERROR +302 sREPORT FPS INCORRECT. 

254 (OCT)= 454 (EXCESS 200) Flyv=1 


ANTICIPATED ERRONEOUS RESULT. 


SEQ 0137 
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LDEXP TEST SEQ 0138 
031452 104413 LPERR SET UP THE “LOOP ON ERROR ADDRESS. 
5514 031454 004737 931610 JSR PC ,@#LDXSUB -GO EXECUTE THE od age Ai 
5515 031460 050515 052535 054555 1$: WORD 50815550538, 54555— 56575 ;ACO OPERAN 
031466 056575 
5516 031470 000254 2s: -WORD 254 -EXPONENT OPERAND 
5517 OF) c05 ab ARE: 052535 054555 3$: . WORD 13) 134509 6 54555, 56575 EXPECTED RESULT. 
5518 031502 000000 000000 000000 4$: «WORD 0,0,0,0 ANTICIPATED ERRONEOUS RESULT. 
031510 000000 
5519 031512 041200 S$: 41200 FPS BEFORE EXECUTION. 
5520 031514 141202 141202 sFPS AFTER EXECUT 
$521 031516 041204 41204 “ANTICIPATED ERRONEOUS FPS, 
5522 031520 000010 10 SEXPECTED FEC. 
5523 031522 104320 6% ERROR +320 ; (BUT FIV) $1344 
5524 031524 000401 ‘ BR 7$ 
5525 031526 104302 ERROR +302 REPORT FPS INCORRECT. 
PP 031530 7$: 
ras 4 sEXP= 313 (OCT)= SI3(EXCESS 200) FIv=0 | 
5530 031530 MMC 14: 
031530 104413 LPERR eset UP THE LOOP ON ERROR ADDRESS. 
5531 031532 004737 031610 JSR PC O EXECUTE THE INSTRUCTION. 
5532 031536 060616 062636 064656 1$: “WORD 6061 te ears 64esée 66676 ;ACO OPERAND. 
031544 066676 
5533 031546 000313 2s: . WORD 313 ;EXPONENT OPERAND. 
5534 Otioee 000000 000000 CO00000 3$: . WORD 0.0.0.0 sEXPECTED RESULT. 
5535 O21 260 Recaps 062636 064656 4$: . WORD 22616,62636,64656,65676 sANTICIPATED ERRONEOUS RESULT. 
5536 031570 046200 S$: 46200 sFPS BEFORE wey he ph 
5537 031572 046206 46206 FPS AFTER EXECUTION 
5538 031574 146202 146202 TANTICIPATED ERRONEOUS FPS. 
5539 031576 177777 -1 ZEMPECTED FEC. 
5540 031600 104321 6$: ERROR +321 (BUT FIV) ST 344 
5541 031602 000401 65R 7$ 
5542 031604 104302 FRROR +302 REPORT FPS INCORRECT. 
5543 031606 7$: 
geee 031606 000540 BR MMCDONE 
5546 THIS SUBROUTINE, LDXSUB, IS USED TO SET UP THE OPERANDS, EXECUTE 
5547 THE LDEXP INSTRUCTION AND CHECK THE RESULTS. A CALL 
5548 3:70 IT IS MADE THUS: 
5549 : 
5550 : JSR PC ,@#LDXSUB 
5551 : ACARG: .WORD X,X,X,X | AC OPERAND } 
5552 EXP: “WORD X 7 EXPONENT 
5553 RES: «WORD X,X,X,X EXPECTED RESULT 
5 ERRES: .WORD X,X,X,X ERROR RESULT 
5555 FPSB: .WORD xX FPS BEFORE EXECUTION 
5556 FPSA: .WORD xX :FPS aren EXECUTION 
5557 5 ERFPS: .WORD X RROR FP 
5558 : FEC: -WORD xX “EXPECTED FEC 
5559 : ERR1: ERROR +X :DATA ERROR. 
5560 : nh CONT 
5561 ERR2: ERROR +x 


: iFPS ERROR. 
5562 ; CONT: ; RETURN ADDRESS 


CKFPCAO FRPIIF FLTG PNT PRT C( 
T60 LDEXP TEST 


8 
5579 021610 
5580 031612 
5581 031616 


5588 031642 
5589 
5590 031646 
5591 
5592 031650 


012601 


000200 


031646 
000032 


000010 


000200 
032100 


032100 


000012 
000004 


000034 
000034 


MACRO M1111 


001236 


001252 
007256 


001246 
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: THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
[THE LDEXP INSTRUCTION IS EXECUTED. 
STHE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
[COMPARED WITH FPSA IF THIS TOO IS CORRECT LDXSUB RETURNS CONTROL 

TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD LDXSUB 

:COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN LOXSUB WILL RETURN 

;TO THE ERROR CALL Al ot OTHERWISE LDXSUB ITSELF 

[REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THF 

ZLDEXP IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 

ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 

THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN LDXSUB 

z;WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 

RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND LDXSUB WILL 

;REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


UDXSUB: MCV (SP)+,R1 :GET A POINTER TO THE ARGUMENTS. 
MOV #200,R0 ‘LOAD THE ACD OPERAND. 
LDFPS RO 
MOV R1,R ‘ 

LDD (RO) ,ACO 
MOV #1$, a#$TMP2 
V 32(R1) ,RO :SET UP THE FPS. 
LDFPS RO 
MOV R1,RO 
ADD #10,R0 

1$: LDEXP (RO).ACO = TEST INSTRUCTION.- 

STFPS RG :GET THE FPS. 
STST —-R5 “GET THE FEC. 
MOV #200,R0 “GET THE RESULT. 
LDFPS RO 

“OV #LDXT.RO 
STD ACO, (RO) 
MOV 4. a4$TMP7 
MOV RD. a#$TMP10 
MOV RS, a#STMP11 
MOV 40(R1), aa$TMP12 
MOV 1,R2 
MOV R2. a#SIMP3 
ADD 10,R2 
MOV (R2) ,a#STMPS 
ADD #2,R2 
MOV R2. a#$T 
MOV #LDXT, a#$STMP 
MOV #LDXT_.R2 :SEE IF THE RESULT WAS CORRECT. 
MOV R1,R3 
ADD #12,R3 
MOV #4.RO 
2$: CMP (R8)+, (R3)* 
BNE :BRANCH IF NOT CORRECT. 
S08 a 2s 
CMP R4.34(R1) :SEE IF THE FPS WAS CORRECT. 
BNE 15$ “BRANCH IF NOT CORREC 


TST ame 


SEQ 0139 


CKFPCAO FP11F FLTG PNT 
60 LDEXP TEST 


5620 032010 
5621 032014 


2 
ees? 032016 


5 
5626 032022 
627 032026 
8 032030 


5 
36 032052 
5637 032052 
5638 052054 

0 
5641 032056 
032062 
3 032064 
5644 032070 
5646 032070 
7 632072 
5650 032074 
5652 032074 
5653 082076 

5 
5656 032100 
032106 

5657 
5658 032110 
032110 


5659 
5660 


5667 
5668 


020561 
001027 


000161 


012702 


032112 000004 
669 








K 
PRT C MACRO M1111 24=SEP=79 15:03 PAGE 25-12 


000040 
000050 
032100 


000022 
000004 


000042 


000036 
000046 


000000 000000 


CMP er SEE IF THE FEC WAS CORRECT. 


BNE ‘BRANCH IF NOT CORRECT. 
3$: JMP 50(R1) RETURN. 
:THE RESULT WAS INCORRECT SO SEE IF THE FAILURE WAS ANTICIPATED. 
10$: | MOV #LDXT,R2 
MOV R1_R 
ADD #22,R3 
MOV #4,RO 
11$: CMP (R2)+, (R3)+* 
BNE 12$ 


SOB RO,11$ 
JMP 42(R1) 


; THE ERROR WAS NOT ANTICIPATED SO REPORT IT HERE. 
13$: ERROR +301 :BAD RES 
BR 3$ 


;SEE IF THE FPS ERROR WAS ANTICIPATED. 
15$: CMP 36(R1) ,R4 


BNE 16$ 
JMP 46(R1) 


16$: 
7; THE FPS WAS NOT ANTICIPATED SO REPORT IT HERE. 
+302 ;BAD FPS 


17$: ERROR ; 
BR ;BUT EZBTY8 
3ST 063 
208: 
sREPORT FEC INCORRECT. 
;BAD FEC 


21%: ERROR +303 
BR 3$ 


;DATA BUFFER: 
LDXT: .WORD 0,0,0.,0 


MMCDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 

;SEE IF THE USER HAS EXPRESSED 

THE DESIRE TO CHANGE THE SOF TWARE 

;VIRTUAL CONSOLE SWITCH REGISTER (HAS 

; THE USER TYPED CONTROL G?). 


PY MAAS ASAAALALARAASLASSLESARARERERESER ARERR RARER RRR RASA RRR RRS S ESS SS | 


S*TEST 61 DESTINATION MODES, MODE 1 (FL=0), TEST 
-% 


;* THIS IS A TEST OF DESTINATION MODE 1 USING 
3* THE STFPS INSTRUCTION 


WEARS ARRSALASALARSASRARRRARRRRRRRARRARRRRRRR RRR RRR RRR RRR RR ARDS ES | 


15161: SCOPE 





SEQ 0140 









CKFPCAO FPI1IF FLTG PNT PRT C 
1 DESTINATION MODES, 


5681 

5682 seabed 
5683 032164 
5684 032170 
5685 032172 
5686 032200 
5687 032202 
5688 032210 
5689 032212 
5690 


6 
5691 


032214 
000006 
177777 
102345 
032162 
032314 


032220 


032220. 


032220 
032222 


MODE 1 


MACRO M1111 


001236 
000004 


102345 
177777 


(FL=0), 


TEST 


NNC1: 


1$: 


NNC2: 


TEST 
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LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV A#NNCTBO ,RO SET UP THE DATA BUFFER. 

MOV #6,R1 

MOV #-1,(RO)+ 


R1,1$ 
MOV #162345,R0 
MOV H#NNC2 , aS TMP 


2 
MOV ANNC25 ,a#ERRVECT ;SET UP FOR TRAPS TO 4. 
LDFPS RO :SET UP FPS. 
MOV #NNCTB1,RO 
STFPS (RO) : TEST INSTRUCTION. 


CMP RO,ANNCTB1 31S RO CORRECT? 

BNE NNC10 BRANCH IF NOT CORRECT. 
CMP @ANNCTB1,4102345  ;1S RESULT CORRECT? 
BNE NNC 15 ;BRANCH IF NOT CORRECT. 
CMP @ANNCTB1+2,4-1 ;1S THE RESULT CORRECT? 
BNE NNC 20 [BRANCH IF NOT CORRECT. 
BR NNC DONE 


DATA BUFFER: 


ie 
SEQ 0141 


CKFPCAO FP11F FLTG PNT PRT 


761 


5696 
5697 032230 
5698 032234 


C 
DESTINATION MODES, MODE 
5693 032214 177777 177777 


5694 032220 177777 177777 
032226 177777 


010037 001242 
012737 032220 
5699 032242 
032242 104377 
032244 000001 
5700 
5701 032246 000435 
5702 
5703 
5704 032250 012737 102345 
5705 032256 013737 032220 
706 032264 
104377 
000002 


7 
032270 000424 
09 


032272 012737 177777 
032300 013737 032222 
032306 
032306 104377 

5 032310 000003 

$ 032312 000413 


032314 
032164 


046250 


011637 001236 
022626 


104377 
000004 


MACRO M1111 
1 (FL=0), TE 


177777 


001240 


001240 
001242 


001240 
001242 


NNCTBO: .WORD 
NNCTB1: .WORD 
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F ites 15:03 PAGE 26 


-1,-1 
=15-1,-1,-1 


;REPORT oy INCORRECT. 
NNC10: RO, 


MOV 


ERROR 
. WORD 


BR 


1$: 


a4$TMP4 
#NNCTB1, a#$TMP3 


+377 
: 


NNCDONE 


RESULT INCORRECT. 
MOV #10 


MOV 


ERROR 
. WORD 


BR 


2345, a#$TMP3 
@ANNC TBI , aa#$TMP4 


+377 
2 


NNCDONE 


RESULT INCORRECT. 
MOV 


MOV 


ERROR 
. WORD 


BR 


#-1, a#STMP3 


RO BAD (BUT 
é FDST)X 


BAD DATA 


@ANNCTB1+2,a4$TMP4 


+377 
3 


NNCDONE 


; (BUT GR7,FL) 
7ST . TO 416 
SINTO 417 


;1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 


;DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, 
AAP ings A taaaal og TO 4 ° 


CMP 
BEQ 
JMP 


MOV 
CMP 


ERROR 
. WORD 


“RSE TUP 


SP) ,R4 
" oANNC2+2 


@4CPSPUR 


(SP) ,a@#$STMP2 
(SP) +, (SP)+ 


+377 
4 


IF NOT GO 


HANDLER 


7 (BUT FDST)+ ST634 


‘o INITIALIZE THE FPS AND STACK; AND 


IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH oe (HAS 
; THE USER TYPED CONTROL G 


DLA A AREA EAA EAA ARAE AREER EAEAAAAARAERAAEAARAAREEAERERK REE E RH 


SEQ 0142 





CKFRCAO aad F 
T62 DESTINA 


032344 
736 
5737 
5738 032346 
032346 


5739 032350 
ay 032354 
360 


5747 032410 
5748 
5749 032414 


5754 34 

5755 032442 

5756 032444 

5757 

5758 

5759 032446 

5760 032452 
032460 

5761 

5762 

5763 032462 

5764 032466 

5765 032474 
032474 
032476 

5766 

5767 032500 

5768 

5769 

5770 032502 

5771 032510 

5772 032516 
032516 

5773 

5774 032522 

5775 

5776 

5777 

5778 032524 

5779 032532 


LT 
TI 


177777 
177777 
177777 


010037 
012737 


104377 
000005 


000435 
012737 
013737 
104377 
000006 


000424 


G PNT PRT C 
ON MODES, MODE 


032446 
000006 
177777 
105412 
032414 
032546 


032452 


032454 
032452 
032454 


177777 
177777 


001242 
032454 


105412 
032452 


177777 
032454 


MACRO M1111 
2 (FL=0), TE 


ed 62 


N 11 
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DESTINATION MODES, MODE 2 (FL=0), TEST 


:* THIS IS A TEST OF DESTINATION MODE 2 USING 
>* THE STFPS INSTRUCTION 


** 
Pettitt iit t titi iit t titi ii tit it iii iti titi iti iii iiiii iii i eT) 
1162: SCOPE 
00C1: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
MOV #O00CTBO,RO [SET UP THE DATA BUFFER. 
MOV #6,R1 
1$: MOV #-1,(RO)+ 
S0B R1,1$ 
MOV #105412,RO 
001236 MOV #O00C2, a4$TMP2 
000004 MOV #O0C25,a#ERRVECT SET UP FOR TRAPS TO VECTOR 4. 
LDFPS RO :SET UP FPS. 
MOV #00CTB1,RO 
O0C2:  STFPS  (RO)+ s TEST INSTRUCTION. 
CMP RO,#OOCTB1+2 IS RO CORRECT? 
BNE 00£10 “BRANCH IF NOT CORRECT 
105412 CMP @¥00CTB1,4105412 IS THE RESULT CORRECT? 
BNE 00C15 :BRANCH IF NOT CORRECT. 
177777 CMP @#00CTB1+2,#-1 21S THE RESULT CORRE CT? 
BNE 00620 “BRANCH IF NOT CORRECT 
BR OOCDONE 
Zs TEST DATA BUFFER: 
OOCTBO: .WORD -1,-1 
177777 OOCTB1: .WORD -1.-1,-1,-1 
REPORT RO INCORRECT. 
00610: R TMP4 
001240 is MOV #00CTB1+2,a4#$TMP3 
ERROR +377 
“WORD 5 
:RO BAD (BUT 
BR OOCDONE :  FDST)X 
;REPORT RESULT INCORRECT. 
001240 00C15: MOV #105412, a#STMP3 > ST 634 
001242 a MOV a#O0C TBI , a#$TMP4 , 
ERROR +377 
-WORD 6 
:BAD DATA 
BR OOCDONE 
;REPORT RESULT INCORRECT. 
001240 00€20: Mov #~1 ,a#STMP3 
001242 MOV a#00( TR1+2,aa$TMP4 


SEQ 0143 


CKFPCAO FP11F FLTG PNT PRT C 
162. =“ DESTINATION MODES, 


5780 032540 
032540 
032542 

5781 

5782 032544 

5783 

5784 

5785 

5786 


5787 
5788 032546 


66 

5795 039570 
032570 
032572 


5797 
5798 032574 
032574 


032576 
5804 032600 

032600 
5805 032602 
5806 032606 
5807 032612 
5808 032616 


5818 032656 
5819 032664 


104377 
000007 


000413 


011637 
022626 


104377 
000010 


104412 


—2 2 ooo 
Sum R 
_> = 
oO _ 
w WwW 


-COoOCCoC°oo°o> 
So 
— 


0.2700 


032416 
046250 
001236 


032700 
000006 
177777 
105555 


032704 
032704 


8 
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MODE 2 (FL=0), 


105555 


TEST 
1$: 
ERROR +377 
-WORD 7 
; (BUT GR7,FL) 
> "BR OOC DONE sST 357 TO 416 
INTO 417 


71F A’ TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
[DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 
370 THE _ TRAP TO 4 HANDLER. 


CMP RG, #OOC2+2 
BEQ 
JMP a#CPSPUR 
1$: MOV (SP) ,a#STMP2 
be CMP (SP)+, (SP) + 
ERROR +377 
<WORD 10 
(BUT FDST)+ $1634 
OOCDONE : 
RSETUP 


3GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE S 


: HE SOF 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


CE AAAARARARAEAREREARERAAEREERAERERRERREREEHEARAAERKRARERAERERRRRHERRA HEH 


;*TEST 63 DESTINATION MODES, MODE 4 (FL=0), TEST 


*t 
;* THIS IS A TEST OF DESTINATION MODE 4 USING 
3;* THE STFPS INSTRUCTION 

+ 


° 
SL AAA AAA RARER AAA EEREERERAEREAERAREEAEAEERREEREEEREREERRER EEE 


1S163: SCOPE 


PPC1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #PPCTBO,RO ;SET UP THE DATA BUFFER. 
MOV #6,R 

1$: MGV #~1,{RO)+ 


SOB R1,1$ 
MOV #105555, RO 
MOV #PPC2, a#STMP2 
MOV wPCoss a dle a :SET UP FOR TRAPS TO VECTOR 4. 
LDFPS RO :SET UP FPS. 
MOV #PPCTB1+2,RO 
PPC2: STFPS (RO) : TEST INSTRUCTION. 
CMP RO, APPCTBI SIS RO CORRECT? 
BNE PPC 10 ‘BRANCH IF NOT CORRECT. 


CMP @#PPCTB1,#105555 :1S hg RESULT Sas Ak 
BNE PPC15 ;BRANCH IF NOT CORRECT 


SEQ 0144 


aa 


CKFPCAO FPIIF FLTG PNT PRT C 


163 


DESTINATION MODES, MODE 4 


032666 
5821 032674 
5822 032676 


032712 
7 


8 
5829 032714 


" 032752 
5840 032754 


5844 032756 


3 
5854 033000 
5855 033002 
5856 033006 
5857 033010 

5858 
5859 033014 
5860 033020 
5861 033022 
033022 
033024 

862 


5863 
5864 033026 
033026 


023727 
001030 
000453 


177777 
177777 
177777 


010037 
012737 


104377 
000011 


000435 
012737 
013737 


104377 
000012 


000424 


012737 
013737 


104377 
000013 


000413 


011637 
022626 


104377 
000014 


104412 


032706 


177777 
177777 


001242 
032704 


105555 
032704 


177777 
032706 


032650 
046250 
001236 


177777 


177777 


001240 


001240 
001242 


001240 
001242 


MACRO M1111 
‘FL=0), TE 


C 
© ert 15:03 PAGE 26- 


CMP @4PPCTB1+2 4-1 


21S THE RESULT CORRECT? 


BNE PPC 20 BRANCH IF NOT CORRECT. 
BR PPCDONE 
ZTEST DATA BUFFER: 
PPCTBO: .WORD -1,- 
PPCTB1: .WORD =1,-1,-1,-1 


ld . INCORRECT. 
PPC10: RO, a#$TMP4 
MOV #PPCTB1, aaSTMP3 


ERROR +377 
«WORD 11 


1$: 


BR PPCDONE 

;REPORT RESULT INCORRECT. 

PPC15: MOV #105555, a#STMP3 
MOV a4PPCTBi , aS TMP4 
ERROR +377 
«WORD 12 
BR PPCDONE 


;REPORT RESULT INCORRECT. 
20: MOV #-1, a4STMPS 
MOV @4PPCTB1+2, aASTMPS 


ERROR +377 
«WORD 13 


BR PPCDONE 


;1F A TRAP TO VECTOR 4 OCCURS COME 
3TO_THE SPURIOUS os ng 4 HANDLER. 
PPC25: MO 


V (SP) ,R 
CMP Re .APPC2+2 
BEQ 1$ 
JMP aa#CPSPUR 
1$: MOV (SP), a#STMP2 
ec CMP (SP)+, (SP)+ 
ERROR +377 
“WORD 14 
PPCDONE : 
RSE TUP 


THE DESIRE TO CHANGE 


RO BAD (BUT 


FDST)X 


;BAD DATA 


; (BUT _GR7,FL) 
ST 357 TO 416 
z INTO 417 


HERE TO SEE IF THE TRAP OCCURRED 
[DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, 


; (BUT FDST)+ 


ST 634 


IF NOT GO 


ST634 


:GO INITIALIZE THE FPS AND STACK; AND 
iSEE IF 


THE USER HAS EXPRESSED 


THE SOF TWARE 


SEQ 0145 


am 


aad FPIIF FLTG PNT PRT C 


DESTINATION MCDES, MODE 4 


033030 
5869 
5870 033032 
30 


5891 

5892 033136 

5893 033142 
033150 

5894 033152 

5895 

5896 

5897 033156 

5898 033162 

5899 033170 
033170 
033172 

5900 

5901 033174 

5902 


5903 
5904 033176 


033214 


012 
012710 
170230 


177777 
177777 
177777 
177777 


010037 
012737 


104377 
000015 


033136 
000010 
177777 
106653 
033104 
033242 
033152 
033142 
033154 
033142 


033152 


177777 
177777 


177777 


001242 
033154 


001236 
000004 


106653 
033142 


177777 


001240 


D1 
MACRO M1111 24=SEP=79 15:03 PAGE 26-4 
(FL=0), TEST 


VIRTUAL CONSOLE SWITCH oa (HAS 
; THE USER TYPED CONTROL G?) 


. WETTTTITILILITILILILILILI LLL LILI 


TEST 64 DESTINATION MODES, MODE 3 (FL=0), TEST 


:* THIS JS A TEST OF DESTINATION MODE 3 USING 
:* THE STFPS INSTRUCTION 


te 
*: LARS RRRRARRARRSARSESSESARRRRRSRS AREAS ARR REAR RRR ES RA RRA RE RRR A SSS SY 


TST64: SCOPE 


QQC1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
MOV #Q0C TBO,RO ;SET UP THE DATA BUFFER. 
MOV #10,R1 

1$: MOV #-1, (RO) + 


R1,1$ 
MOV #106653,RO 
MOV #QQ0C 2, a4$TMP2 
MOV #Q0C25 ,a#ERRVECT :SET UP FOR TRAPS TO VECTOR 4. 
LDFPS RO :SET UP FPS. 
MOV #QQCTB2,RO 
MOV #QQCTB1. (RO) 


; TEST INSTRUCTION. 


QQC2: STFPS a(RO)+ d 
CMP RO ,AQQCTB2+2 71S RO aT 
BNE aac 10 BRANCH IF NOT CORRECT 
CMP ~—- #106653. sis THE RESULT CORRECT? 
BNE Qc15 H IF NOT CORRECT 
C ar00CTR2, WOQCTB1’ ;1S THE RESULT CORRECT? 
BNE Q0C20 ;BRANCH IF NOT CORRECT. 
BR QQCDONE 


;TEST DATA BUFFER: 

QQCTBO: .WORD -1,-1 
QQCTB1: .WORD  <-1,-1,-1,-1 
QQCTB2: .WORD -1,-1 


REPORT RO aa 


00¢10: awSTMPS 
4 MOV #OOCTB2+2, a#$TMP3 
ERROR +377 
“WORD 15 
:RO BAD (BUT 

BR QQCDONE ; EDST)X 
{REPORT RESULT INCORRECT. 
Goc15: Mov #106653, a#STMP3 : ST 634 
mr MOV awQOC TAI , ar$TMP4 


ERROR +377 
«WORD 16 


SEQ 0146 


A040 


CKFPCAQ FP11F FLTG PNT PRT C 
764 DESTINATION MODES, MODE 3 (FL=0), 


5907 

5908 033216 

5909 

5910 

5911 

5912 033220 

5915 033226 

5914 033234 
033234 


033236 
rat 033240 


5924 033252 
5926 033256 


5931 033270 
033270 


033272 
5936 


5937 
5938 033274 

033,74 
5939 033</6 
940 033302 


5946 033334 


000424 


012737 
013737 


104377 
000017 


000413 


011604 
020427 
001402 
000137 


011637 
022626 


104377 
000020 


104412 


MACRO M1 


033152 001240 
033144 001242 


033106 
046250 
001236 


E 1 
111. 24=SEP=79 15:03 PAGE 26-5 


TEST 
BAD DATA 
BR QQCDONE 
;REPORT RESULT goa ly 
Q0C20: MOV QQC TB2, a#$TMP3 ; (BUT FDST) 


MOV aHOGC TBI +2. aF$TMP4 
ERROR +377 

«WORD 17 

BR QQCDONE 


1$: 


;1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
;DURING EXECUTION OF THE FPP ma BEING TESTED, IF NOT GO 
3;TO THE — TRAP TO 4 HANDLER 


00C25: V (SP) ,R4 

CMP R4,#Q0C2+2 

BEQ 1$ 

JMP a@4CPSPUR 
1$: MOV (SP) ,@#$STMP2 

CMP (SP)+,(SP)+ 
2s: 

ERROR +377 

“WORD 20 : 

; (BUT FDST)+ ST634 

QQCDONE : 

RSETUP 3GO INITIALIZE THE FPS AND STACK; AND 

;SEE IF THE USER HAS EXPRESSED 


:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
STHE USER TYPED CONTROL G?) 


STRATA ARERR AAKRE AERA EAERRAEKAERRARRAAAEAERRARRAERRAAAERAREKHA EEE 


S*TEST 65 DESTINATION MODES, MODE 5 (FL=0), TEST 
+ 


:* THIS IS A TEST OF DESTINATION MODE 5 USING 

3* THE STFPS INSTRUCTION 

-* 

PETTITT TI TTT TT TTT TTT iti titi iti i itt i titi titi titi t itt t titi ii it i 


1S165: SCOPE 


RRC1: 
LPERR SET UP THE LOOP ON ERROR ADDRESS. 
MOV #RRCTBO RO SET UP THE DATA BUFFER. 
MOV #6,R1 

1$: MOV #~1,(RO)+ 


R 
MOV #004301, RO 

MOV #RRC2, aASTMP2 

MOV onne 8a a#ERRVECT :SE 


: OR TRAPS TO VECTCR 4. 
LDFPS RO 7 SE 


v 
nn 


SEQ 0147 


=—_ 


CKFPCAO FPT1F FLTG PNT PRT C 
DESTINATION MODES, 


F l2 
MACRO o_o" 15:03 PAGE 26-6 











MOV #MRRCTB2+2,RO 


MOV #RRCTB1,-2(RO) 








RRC2: STFPS @=(RO) 7 TEST yt ht ee 
CMP wee ARRCTB2 SIS RO CORREC 
BNE RRC10 [BRANCH IF NOT. ” CORREC 
CMP @ARRCTB1,#004301 ;1S THE RESULT CORRECT? 
BNE RRC15 ;BRANCH IF NOT CORRECT. 
CMP BARRE TB, ARRCTB! ;1S THE RESULT CORRECT? 
BNE RRC20 ;BRANCH IF NOT CORRECT. 
BR RRCDONE 





; TEST DATA BUFFER: 
RRCTBO: .WORD <-1,-1 
RRCTB1: .WORD <=-1,-1,-1,-1 


RRCTB2: .WORD <-1,-1 
oe -- INCORRECT. 
RRC10: 


RO, a#$TMP4 
MOV #RRC CTB2, av$TMPs 





ERROR +377 
21 





« WORD 
RO BAD (BUT 
BR RRCDONE J FDST)X 
sREPORT RESULT INCORRECT. 


~RRC15: MOV #004301, a#$TMP3 : ST 634 
MOV @ARRCTBI , a#$TMPS 


ERROR +377 
-WORD 22 


BR RRCDONE 


ZBAD DATA 


REPORT RESULT INCORRECT. 
RRC20: MOV #RRCTB2, AAS TMP 8 BUT FDST) 
MOV @ARRCTB1 +2, a"$TMPS 


1$: 
ERROR +377 
-WORD 23 
; (BUT GR7,FL) 
BR RRCDONE , *ST 357 TO 416 
zs INTO 417 


:1F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF ‘HE TRAP OCCURRED 
[DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT GO 
TO THE SPURIOUS engl re 4 HANDLER. 


RRC25: MOV (SP),R 
CMP RG, WRRC2+2 
BEQ 1 
JMP a4CPSPUR 

1$: MOV (SP) aS IMP2 


CMP (SP)+,(SP)+ 








he 


CKFPCAO FPIIF FLTG PNT PRT C 


165 


MACRO M1111 24=SEP=79 15:03 


DESTINATION MODES, MODE 5 (FL=0), TEST 


5997 033530 
033530 
5 033532 


5999 
6000 033534 
033534 


6005 

6006 033540 
033540 

6007 033542 


6013 033572 
6014 033600 
6015 033602 
6016 033604 
6017 


6018 023610 
6019 033614 
3620 


6027 033650 
6028 


6029 

6030 033652 

6031 033656 
033664 


104377 
000024 


104412 


177777 
177777 
177777 


010037 
012737 


104377 


G 1 
PAGE 26-7 


23: 
ERROR +377 
SWORD 24 
: (BUT FDST)* $7634 
RRCDONE : 
RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
“SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOFTWARE 
“VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 
SS RAAAAAAARARAKRROERTRAARARAERRKRARAERARRARARAEARARAERARAEORHERRER ES 
S*TEST 66 DESTINATION MODES, MODE 6 (FL=0), TEST 
:* THIS IS A TEST OF DESTINATION MODE 6 USING 
t* THE STFPS INSTRUCTION 
Peretti ttt t iti tt titer et tit titi t itt t ict t i ttt titi ttt titi titties 
15166: SCUPE 
SSC1: 
LPERR SET UP THE LOOP ON ERROR ADDRESS. 
033652 MOV #SSCTBO,RO >SET UP THE DATA BUFFER 
000006 MOV #6,R1 
177777 1$: MOV #-1,(RO)+ 
S08 R1,1 
102514 MOV #102514.RO 
033610 001236 MOV #SSC2,a4STMP2 
033752 000004 MOV #SSC 25, aMERRVECT ;SET UP FOR TRAPS TO VECTOR 4. 
LDFPS RO :SET UP FPS 
CLR R1 
026455 MOV #SSCTB1-5201,R0 
005201 SSC2:  STFPS  5201(RO) : TEST INSTRUCTION. 
000000 CMP R1,40 WAS PC CORRECT AFTER EXECUTION? 
BNE $S630 “BRANCH IF NOT CORRECT 
026455 CMP RO. #SSCTB1-5201 :IS NO CORRECT? 
BNE ssc “BRANCH IF NOT CORRECT 
033656 102514 CMP a¥SSCTB1,4102514 ;:IS THE RESULT CORRECT? 
BNE SSC15 ;BRANCH IF NOT CORREC 
033660 177777 CMP @ASSCTB1+2,4-1 21S THE RESULT SORRECTS 
BNE $SC20 ‘BRANCH IF NOT CORRECT. 
BR SSCDONE 
> TEST DATA BUFFER: 
177777 SSCTBC: .WORD -1,-1 
177777 177777 SSCTB1: .WORD <-1.-1,-1,-1 
; REPORT RO INCORRECT. 
001242 $5010: RO, a#STMP 
026455 001240 a mov #SSCTBI~- 5301, aa$TMP3 
ERROR +377 


SEQ 0149 


= 


: 


H 1 
CKFPCAQ FRPIIF FLTG PNT PRT ( MACRO M1111 24=SEP=79 15:03 PAGE 26-8 
166 DESTINATION MODES, MODE 6 (FL=0), TEST SEQ 0150 


033702 000025 «WORD = 25 


















11 
veer FPTIF FLTG PNT PRT ( MACRO M1111 Demarini 15:03 PAGE 27 


DESTINATION MODES, MODE 6 (FL=0), TE SEQ 0151 









6038 
6039 033704 000440 BR SSCDONE 









6041 oa RESULT whee SE 
6042 033706 012737 102534 0012460 §SsC15: MOV #102534, a#STMP3 
6043 033714 013737 033656 001242 MOV BNSC TBI aa$TMP4 
6044 033722 1$: 
033722 104377 ERROR +377 
033724 000026 -WORD 26 
6045 BAD DATA 
a. 033726 000427 BR SSCDONE 







6049 REPORT RESULT INCORRECT. 

6050 033730 012737 177777 001240 SSC20: MOV #-1, aS TMP3 

6051 033736 013737 033660 001242 MOV ansécTBl +2, A$ TMPS 
6052 033744 1$: 







033744 104377 ERROR +377 

033746 000027 -WORD 27 
6053 ; (BUT _GR7,FL) 
6054 033750 000416 BR SSCDONE 3ST 357 TO 416 
6055 INTO 417 










6057 31F A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
6058 ;DURING EXECUTION OF THE FPP INSTRUCTION BEING TESTED, IF NOT SO 
6059 3TO_ THE SPURIOUS TRAP TO 4 HANDLER. 

6060 033752 011604 $SC25: MOV (SP) ,R4 

6061 033754 020427 033612 CMP RG ,ASSC2+2 

6062 033760 001402 BEQ 1$ 

7994 033762 000137 046250 JMP @4CPSPUR 















6065 0337466 011637 001236 1$: MOV (SP) ,a#$STMP2 
6066 033772 022626 CMP (SP)+,(SP)+ 
6067 033774 23: 
033774 104377 ERROR +377 
033776 000030 -WORD 30 
6068 ; (BUT FDST)+ ST634 
ris 44 034000 000402 BR SSCDONE 
6071 a. ;REPORT PC NOT INCREMENTED BY 2 DURING EXECUTION. 
6072 034002 SSC 30: 
6073 034002 1$: 
034902 104277 ERROR +377 
034004 000031 .WORD 31 
6074 zPC NOT 
6075 > INCREMENTED 
6076 :BY 2 
6077 
6078 034006 SSCDONE : 
034006 104412 RSE TUP ;GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
7 THE USER TYPED CONTROL G?). 
6079 
6080 





SL TTA AAHAAAAAAAAAAAARKAREHAAARERAHAKAREAAAHHHAReARARAKeeaeenense 


167 


J 12 
CKFPCAO FPIIF FLTG PNT PRT ( MACRO i ea ctl 15:03 PAGE 27-1 


DESTINATION MODES, MODE 7 (FL=0) 


034010 
6082 
6083 034012 
34012 


6109 034136 


6116 


012760 
170270 


177777 
177777 
177777 
177777 


010037 
012737 


104377 
000032 


000440 


012737 
013737 


104377 
000033 


000427 


seTest 67 DESTINATION MODES, MODE 7 (FL=0), TEST 


Se THIS IS A TEST OF DESTINATION MODE 7 USING 

3* THE STFPS INSTRUCTION 

»@ 

MRTTITTTITTTLILI LILLE LLL LLL LLL LLL LLL LLL LLL LLL 


+8167: SCOPE 


TTCA. 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
034132 MOV #TTCTBO,RO =SET UP THE DATA BUFFER. 
000010 MOV #10,R1 
177777 1$: MOV #-1" (RO)+ 
SOB 
103747 MOV #103747,R0 
34070 001236 MOV ATTC2,a4$TMP2 
034236 000004 MOV WTTC25,aM#ERRVECT ;=SET UP FOR TRAPS TO VECTOR 4. 
LDFPS RO :SET UP FPS. 
CLR RI 
026745 MOV #TTCTB2-5201,RO 
034136 005201 MOV #TTCTB1,5201 (RO) 
005201 T1CZ2:  STFPS  @5201(RO) : TEST INSTRUCTION. 
000000 CMP #0,R1 :WAS PC CORRECT AFTER EXECUTION? 
BNE TTC30 __ BRANCH IF NOT CORRECT 
026745 CMP RO, ATTCTB2=5201 :1S RO CORRECT? 
BNE TTC10 “BRANCH IF NOT CORRECT 
034136 103747 CMP @#TTCTB1,#103747 :1S THE RESULT CORRECT? 
BNE TTC15 :BRANCH IF NOT CORRECT. 
034140 177777 CMP afiTCTB1+2, #-1 =I1S THE RESULT CORRECT? 
BNE TTC20 “BRANCH IF NOT CORRECT. 
BR TTCDONE 
STEST DATA BUFFER: 
177777 TTCTBO: .WORD -1,-1 
177777 177777 TTCTB1: .WORD  -1.-1,-1,-1 
177777 TTCTB2: .WORD -1,-1 
; REPORT RO INCORRECT. 
001242 TTC10: RO, a#$TMP 
026745 001240 ‘J mov #TTCTR2- 6301, aaSTMP3 
ERROR +377 
“WORD 32 
:RO BAD 
BR TTCDONE 
:REPORT RESULT INCORRE CT . 
103747 001240 TTC15: MOV #103747, a#SIMP3 
034136 001242 MOV SeTTCTBY aes TMP, 
ERROR +377 
<WORD 33 
~~~ BAD DATA 


BR TTCDONE 


SEQ 0152 





CKFPCAO FP11F FLTG PNT PRT C 
167 DESTINATION MODES, MODE 


6169 034322 


012737 
013737 


104377 
000034 


000416 


000 
011637 
022626 


104377 
000035 


000402 


104377, 
000036 


104412 


177777 + 001240 
034140 001242 


034072 


046250 
001236 


000300 
034356 
034326 001236 
034370 


MACRO M1111 
7 <FL=0), TE 





K_1 
24=SEP=79 15:03 PAGE 27-2 
ST SEQ 0153 


REPORT RESULT INCORRECT. 
MOV #-1 


TTC20: , OASTMPS 
- MOV SeTtCIBie2, OFS TMPS 
ERROR +377 
-WORD 34 
; (BUT eet: 
BR TTCDONE ST 357 TO 416 
zs INTO 417 
: IF A TRAP TO VECTOR 4 OCCURS COME HERE TO SEE IF THE TRAP OCCURRED 
DURING EXECUTION OF THE FPP owl BEING TESTED, IF NOT GO 
ity THE SPURIOUS TRAP TO 4 HANDLER 
TC25: MOV (SP) ,R4 
CMP R4 WATTC2+2 
BEQ 1$ 
JMP a4CPSPUR 
1$: MOV (SP) ,@ASTMP2 
~ CMP (SP)+,(SP)+ 
ERROR +377 
-WORD 35 
: (BUT FSDT)+ ST634 
BR TTCDONE 
— PC NOT INCREMENTED BY 2 DURING EXECUTION. 
1$: 


ERROR 
-WORD 36 


+$77 
zPC NOT 
; INCREMENTED 
260 a ik a THE FPS AND STACK; AND 


TTCDONE : 
RSETUP 


THE Des CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?). 


4 ERA AAAAAAAEEAERRAEREAAAEREEAAAAAAAEAARAEARAAAARAERARERERAAKARA REED 


TEST 70 DESTINATION MODES, MODE 2 (FL=1)., TEST 


;* THIS IS A_TEST OF DESTINATION MODE 


:8 2 USING STCOL WITH REGISTER 0 


a3 —MmARARARARARARASSAAE RS RER RARER ARERR RRR RRR RRR RAR RRRRR RRA RAR RASA SSS SOI 


SCOPE - 
UUC1: 


LPERR 
MOV 

LDFPS RO 
MOV 

LDD 
MOV 
MOV 


7SET UP THE LOOP ON ERROR ADDRESS. 
ZSET UP FPS. 


SET UP THE ACO OPERAND. 


#UUCBF 0 ,RO 





CKFPCAQ FP11F FLTG PNT PRT C MACRO M1 


T70 DESTINATION MODES, MODE 2 (FL=1), 


0 
ofa 034326 175420 
6173 034330 020027 034374 
61 a 034334 001420 


6 
6177 034336 010037 001242 
6178 034342 012737 034374 001240 


82 
6183 034356 000000 000000 000000 
034364 


84 034366 
6185 034370 177777 177777 177777 


6188 
6195 


6198 034404 012700 000300 
6200 034412 012700 034462 


6202 034420 012737 034432 001236 
6203 034426 012700 034500 


6204 
6205 034432 175440 
6206 
6207 034434 020027 034474 
6208 034440 001420 
10 
6211 034442 010037 001242 
atts 034446 012737 034474 001240 


54 104377 
034456 000040 


L 1 
111 24=SEP=79 15:03 PAGE 27- 
TEST 


vuC2: STCDL ACO,(RO)+ 7 TEST INSTRUCTION. 


CMP RO, #UUCBF O0+4 31S RO CORRECT? 
BEQ UUCDONE BRANCH IF CORRECT. 


;REPORT RO INCORRECT. 
UuC3: MOV RO, @#$TMP4 
MOV HUUCBF 0+4 , aS 7MP3 


ERROR +377 ‘ 
-WORD 37 
zRO NOT INCR BY 4 


BR UUCDONE 
; TEST DATA BUFFER: 
UUCTP1: .WORD 0.0.0.0 


-1 
WUCBFO: .WORD  =1,-1,-1 


UUCDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 


'WERAAAAASSASASZASLASZSEALESAARAR ERR RAARAARARRRRSRR SALE REAR RS RRR SASS SS 


S*TEST 71 DESTINATION MODES, MODE 4 (FL=1), TEST 


+ 
7* THIS IS A_TEST OF DESTINATION MODE 
4 USING STCDL WITH REGISTER 0 


~MmARAAAAAAAALALALLALALASALALARESLERRRERRRR SARE RRR RRR RRR ESR RAR SES SS 


18171: SCOPE 
vVC1: 
LPERR zSET UP Ls —_ ON ERROR ADDRESS. 
V #300,R0 *SET UP FP 
LDFPS R 


MOV #VVCTP1,RO SET UP THE ACO OPERAND. 


MOV AVVCBFO0+4,RO 
vvC2: STCDL ACO,-(RO) 


CMP RO ,AVVCBFO 
BEQ VVCDONE 


REPORT -# INCORRECT. 
vvC3: RO, a#STMP4 
1s MOV pate ed aa$TMPS 


ERROR +577 
-WORD 40 


3; TEST INSTRUCTION. 
31S RO CORRECT? 


RO NOT DECR By 4 


SEQ 0154 


M1 
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71 DESTINATION MODES, MODE 4 (FL=1), TEST SEQ 0155 


6215 034460 000410 BR VVCDONE 
6216 TEST DATA BUFFER: 
6217 Soe «3 000000 000000 000000 vvCTP1: .WwORD 0,0,0,0 


0 000000 
6218 034472 177777 - 
6219 034474 177777 177777 #177777 «VVCBFO: .WORD -1,-1,-1 


20 
934502 VVCDONE : 
934502 104412 RSE TUP ee tt tet a THE FPS AND STACK; AND 


HE SOF E 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 


—MmAAAAASESASAALRASLALALAALASALAARALARASESASAR SEARS AS AAR ESAS SASS SS SS | 


:ATEST 72 STCDI AND STCDL TEST 


;* THIS IS A_TEST OF THE he a 
;* STCDL INSTRUCTIONS. NOTE T 
* SUBROUTINE, STCSUB, IS USED. to 
:* SET UP THE OPERANDS, EXECUTE THE STC 
;@ * INSTRUCTION AND CHECK THE RESULT. 


MADARA SLASLASZASLASLAAALASALAAAAASAALSARELAAR RRR ARRAS S SERRA RAR ASR RRS SSS SD | 


ST72: SCOPE 
Ah aa TEST STC WITH ExXP=100 (EXCESS 200) 


:SET UP THE LOOP ON ERROR ADDRESS. 
035654 PC ,a4STCSUB ;GO EXECUTE THE INSTRUCTION. 
009000 1$: ° 20000,0.0.0 [ACO OPERAND. 


2$: . EXPECTED RESULT. 
3$: . WORD ERROR RES. 
4$: FPS BEFORE ye hg 
403 3FPS AFTER EXECUTION 
ANTICIPATED ERRONEOUS FPS. 
; RESULT INCORRECT. 
5$: 2 RESULT INCORP. 


sEITHER (BUT FLAG) 

ST 662 
sOR CLEAR FLAG 
ST 774 


i 


6$: 


sEKP=0 (OCT) 
WWC2: 


T UP THE LOOP ON ERROR ADDRESS. 
035654 J PC ,a#STCSUB ‘20 EXECUTE THE INSTRUCTION. 
000000 : ° 40000.0,0.0 ZAC zACO OPERAND. 


0,0 ZEXPECTED RESUL 
of <1 [ANTICIPATED PRONE OUS RESULT. 
[FPS BEFORE EXECUTION. 
[FPS AFTER EXECUTION. 
140304 “ANTICIPATED ERRONEOUS FPS. 
177777 1 sEXPECTED FEC. 

















N_1 
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172 STCDI AND STCDL TEST SEQ 0156 


6261 034610 nee 5$: te +322 sREPORT RESULT INCORRECT. 
ater 034614 104326 ERROR +326 REPORT FPS INCORRECT. 














6266 sEXP=57 (OCT) = FL=1 FIC=1 
6267 034616 WWC4: 
034616 104413 LPERR SET UP THE LOOP ON ERROR ADDRESS. 
6268 034620 004737 035654 JSR PC ,@4STCSUB ;GO EXECUTE THE INSTRUCTION. 
6269 Oeeeks pth 14 075757 157737 1$: -WORD 4766775757, 157737, 167773 sACO OPE 
6270 034634 055675 173757 2$: -WORD 55675,173757 aT tiRa RESULT. 
6271 034640 122102 004021 3$: «WORD 122102,004021 7 AN ie RESULT. 






73 040700 40700 ; 
6274 034650 140705 140705 ANTICIPATED ERRONEOUS FPS. 
6275 034652 177777 = SEXPECTED FEC. 
6276 034654 104327 5$: ERROR +327 ; (BUT ENBT) ST 632 
6277 034656 000401 BR 6$ 
ocrs 034660 104326 ERROR +326 REPORT FPS INCORRECT. 
























6281 sEXP=40 (OCT) = FL=1 FIC=1 
6282 034662 WwwWC5: 
034662 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
6283 034664 004737 035654 JSR PC ,a4STCSUB 3GO EXECUTE THE INSTRUCTION. 
6284 034670 050000 000000 000000 1$: -WORD 50000.0.0.0 SACO OPERAND. 
034676 000000 
6285 034700 000000 000000 2$: -WORD 0,0 EXPECTED RESULT. 
6286 034704 177777 177777 3$: -WORD <-1,-1 SANTI CIPATED ERRONEOUS RESULT. 
6287 034710 040700 4$: 40700 FPS BEFORE EXECUTION. 
6288 034712 140705 140705 FPS AFTER EXECUTION. 
6289 034714 040705 40705 ANTICIPATED ERRONEOUS FPS. 
6290 034716 000006 6 sEXPECTED FEC. 
6291 034720 104322 5$: ERROR +322 REPORT RESULT INCORRECT. 
6292 034722 0 BR 6$ 
6293 034724 104330 ERROR +330 ; (BUT FIC) ST 004 REPORT FPS INCORRECT. 








6294 TO 305 INTO ' 
6295 034726 6$: 3315 ‘ 
6296 


ZEXP=40 (OCT)  FL=1  FIC=0 . 
034726 104413 "  LPERR ;SET UP THE LOOP ON ERROR ADDRESS.’ 











6299 034730 004737 035654 JSR PC a#STCSUB “GO EXECUTE THE INSTRUCTION. 
6300 034734 050000 000000 000000 1$: ~WORD 50000,0,0.0 [ACO OPERAND. 








034742 000000 
6301 034744 000000 000000 23: -WORD 0,0 EXPECTED RESUL 
6302 034750 177777 177777 3$: -WORD -1,-1 ANTICIPATED ERRONEOUS RESULT. 
6303 034754 040312 4$: 40312 :FPS BEFORE Oi 
6304 034756 040305 40305 FPS AFTER EXECUTION. 
6305 034760 140305 140305 ZANT ICIPATED ERRONEOUS FPS. 
6306 034762 177777 -1 EXPECTED F 
6307 Serres Hob 4 5$: ERROR +322 ;REPORT RESULT INCORRECT. 





00040 BR 6 
104331 ERROR +331 ; (BUT FIC) ST 004 TO 
3315 INTO 305 





6309 034770 
6310 034772 
6311 


_ FPIIF =" PNT PRT C 


STCDI AND 
6312 
6313 034772 
03477 
6314 034774 
6315 035000 
006 
6316 035010 


6324 035034 
6325 035036 
6326 
6327 
6328 035036 
5036 
6329 035040 
6330 035044 
5052 
6331 035054 
6332 035060 
6333 035064 
6334 035066 
6335 035070 
6336 035072 


6355 035146 

6356 

6357 

6358 035146 
035146 

6359 035150 

6360 035154 
035162 


MACRO M1111 
STCDL TEST 
3; EXP=30 
WwwC7: 
104413 
004737 035654 
046000 000001 000000 1$: 
000200 000001 2$: 
177777 =177777 3$: 
040700 4$: 
040700 
177777 
177777 
322 5$: 
01 
104323 
6$: 
EXP=27 
C8: 
104413 
004737 035654 
045600 000001 000000 1$: 

1 000000 2$: 
177777 | =177777 3$: 
040707 4$: 
040700 
177777 
177777 
104322 5$: 
000401 
104323 

6$: 
EXP=17 
C9: 
104413 
004737 035654 
043600 000000 000000 1$: 
040000 177777 2$: 
000000 177777 3$: 
040600 4$: 
040600 
140604 
177777 
104332 5$: 
01 
104333 
6$: 
EXP=20 
WwwWwC10: 
104413 
004737 035654 
044000 000000 000000 1$: 
000000 


(OCT) 


(OCT) 


LPERR 
JSR 
. WORD 


8.1 
24-SEP-79 15:03 PAGE 27-6 


;SET UP THE LOOP ON ERROR ADDRESS. 


“GO EXECUTE THE INSTRUCTION. 
SACO OPERAND. 


EXPECTED RESUL 

ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE ty hh 

FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


sEXPECTED FEC 


FL=1—- FIC=1 
PC ,@4STCSUB 
46000,1,0,0 
200,1 

-1,-1 

+322 

6$ 

+323 

FL=1 FIC=1 
PC,@4STCSUB 


45600,1.0,0 


100, ? 
-1,<1 


EXPECTED F 


+322 

6$ 

+323 

FL=0~— FIC=1 
PC ,a#STCSUB 
43600,0,0,0 
40000,-1 

0,-1 

+332 

6$ 

+333 

FL=0~— FIC=1 
PC ,a@4STCSUB 
44000,0,0,0 


;REPORT RESULT INCORRECT. 
REPORT FPS INCORRECT. 


SET UP THE LOOP ON ERROR ADDRESS. 


;GO EXECUTE THE INSTRUCTION. 
[ACO OPERAND. 


sEXPECTED RESULT. 
ZANTICIPATED ERRONEOUS RESULT. 


é CUTION. 
ANTICIPATED ERRONEOUS FPS. 


SEXPECTED FEC. 


REPORT RESULT INCORRECT. 
REPORT FPS INCORRECT. 


SET UP THE LOOP ON ERROR ADDRESS. 


+1 EXECUTE THE INSTRUCTION. 
;ACO OPERAND. 


EXPECTED RESULT. 
ANTICIPATED nniie RESULT. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


;BAD CONSTANT ST 066 
REPORT FPS INCORRECT. 


SET UP THE LOOP ON ERROR ADDRESS. 


£60 EXECUTE T THE INSTRUCTION. 


SEQ 0157 


a 


C1 
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T72 STCDI AND STCDL TEST SEQ 0158 


6361 035164 000000 177777 23: . WORD <1 ;EXPECTED RESULT. 
6362 035170 177777. 177777 3$: “WORD =1,-1 TANTICIPATED ERRONEOUS RESULT. 
6363 035174 040600 4$: 40600 [FPS BEFORE EXECUTION. 
6364 035176 140605 140605 sFPS AFTER EXECUTION. 
6365 035200 040600 40600 :ANTICIPATED ERRONEOUS FPS. 
6366 035202 000006 6 Z EXPECTED FEC. 
6367 035206 104322 | S$: ERROR +322 REPORT RESULT INCORRECT. 
6368 035206 000401 BR $ 
6369 035210 104334 ERROR +334 :BAD CONSTANT ST 066 
6370 035212 6$: 
6372 ZEXP=10 (OCT), AC NEGATIVE, FL=0, FIC=1 
6373 035212 wwC11: 
035212 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
6374 035214 004737 035654 JSR PC ,a#STCSUB [GO EXECUTE THE INSTRUCTION. 
6375 035220 142000 000000 000000 1$: “WORD 142000,0,0,0  :ACO OPERAND. 
035226 000000 
6376 035230 177600 177777 2$: .WORD  177600,-1 sEXPECTED RESULT. 
6377 035234 000200 000000 3$: “WORD 200,0 SANT ICIPATED ERRONEOUS RESULT. 
6378 035240 040600 4$: 40600 FPS BEFORE EXECUTION. 
6379 035242 040610 40610 ‘FPS AFTER EXECUTION. 
6380 035244 040600 40600 SANTICIPATED ERRONEOUS FPS. 
6381 035246 177777 -1 sEXPECTED FEC. 
6382 035250 104335 S$: ERROR +335 + (BUT ENBT) ST 632 
6383 035252 000401 BR 6$ 
6384 035254 104336 ERROR +336  ;(SET FN) ST 473 
6385 035256 6$: 
6386 , 
6387 sEXP=37 (OCT), FL=1, FIC=1, AC NEG. 
6388 035256 WwWwC12: 
035256 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
6389 035260 004737 035654 JSR PC, a#STCSUB 'GO EXECUTE THE INSTRUCTION. 
6390 035264 147600 000000 000000 1S: -WORD 147600,0,0,0  :ACO OPERAND. 
6391 035274 140000 000000 2$: .WORD  140000,0 EXPECTED RESULT. 
6392 035300 137777 000000 3$: “WORD  137777.0 ANTICIPATED ERRONEOUS RESULT. 
6393 035304 040700 4$: 40700 :FPS BEFORE EXECUTION 
6394 035306 040710 40710 [FPS AFTER EXECUTION. 
6395 035310 177777 -1 ‘ANTICIPATED ERRONEOUS FPS. 
639% 035312 177777 -1 sEXPECTED FEC. 
6397 035314 104337 5$: ERROR +337 : (BUT COUT) ST 375 
6398 035316 000401 BR 6$ tST 275 TO 074 
6399 035320 104323 ERROR +323 SINTO 274 
6400 035322 6$: 
6402 ZEXP=37 (OCT), FL=1, FIC=1, AC NEG 
6403 035322 Ww 13: 
035322 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
6404 035324 004737 035654 JSR PC, a#STCSUB 7GO EXECUTE THE INSTRUCTION. 
6405 035330 147600 000000 001000 1$: “WORD  147600,0,1000,0 :ACO OPERAND. 
6406 035340 137777 177777 2$: .WORD 137777.,177777 : EXPECTED RESULT 
6407 035344 140000 177777 3$: “WORD 140000.177777 ANTICIPATED ERRONEOUS RESULT. 
6408 035350 040707 4$: 40707 FPS BEFORE EXECUTION. 
6409 035352 040710 40710 SFPS AFTER EXECUTION. 
6410 035354 177777 -1 *ANTICIPATED ERRONEOUS FPS. 


6411 035356 177777 -1 SEXPECTED FEC. 





am 


aaa FP11F FLTG PNT PRT C 


STCDI AND STCDL TEST 


a abet Dabab af ath 
0 ONO w 


oO 
Nv 


ts EEFFFFEF 
Oo 


6429 0354 
ah 035432 
e382 035432 


6459 o3¢e02 
60 


104340 
000401 
104323 


;EXP=40, AC NEGATIVE, FL 
WWC16: 


5$: 

6$: 

sEXP=41 

C14: 

035654 
000000 000000 1$: 
000000 2$: 
177777 3$: 

4$: 

S$: 

sEXP=40 

C1S: 

035654 
000001 000000 1$: 
000000 2$: 
177600 3$: 

4$: 

5$: 

6$: 
035654 
000000 000000 1$: 
000000 2$: 
000000 3$: 

4$: 

5$: 

6$: 

EXP 40 


MACRO M1111 24=SEP=79 


ERROR 


BR 
ERROR 


(OCT), 
LPERR 
JSR 
WORD 
. WORD 
. WORD 
40700 
la 
6 
ERROR 
BR 
ERROR 
(OCT), 


D1 
15:03 PAGE 27-8 


+340 og A tm 
6$ :T0 274 INTO 074 
+323 REPORT FPS INCORRECT. 


AC NEG, FL=1, FIC=1 


;SET UP THE LOOP ON ERROR ADDRESS. 


PC, a#STCSUB ‘GO EXECUTE THE INSTRUCTION. 
OPERAND. 


150200.0,0,0 ACO 
0,0 ZEXPECTED RESULT. 
-1,-1 ‘ANTICIPATED ERRONEOUS RESULT. 


:FPS BEFORE ty de HE 

FPS AFTER EXECUT 

: ANTICIPATED ERRONEOUS PPS. 
SEXPECTED FEC. 


+ a REPORT RESULT INCORRECT. 
+341 ; (BUT EZBT) ST 377 
AC NEG, FL=1, FIC=1 


SET UP THE LOOP ON ERROR ADDRESS. 
C,@4STCSUB 3GO EXECUTE THE INSTRUCTION. 
5000.1 0,0 7ACO OPERAND. 


P 

: 

0,0 EXPECTED RESULT. 

100000,-200 ANTICIPATED a RESULT. 
;FPS per Ore EXECUTION 
:FPS AFTER EXECUTION. 
:ANTICIPATED ERRONEOUS FPS. 

sEXPECTED FEC 


+342 : (BUT COUT) ST 360 
$ :TO 654 INTO 454 
+323 ‘REPORT FPS INCORRECT. 


=1, FIC=1 

SET UP THE LOOP ON ERROR ADDRESS. 
PC ays TCSUB “GO EXECUTE THE INSTRUCTION. 
150001,0,0,0  :ACO OPERAND. 


ONTAC IPA RESULT. 


75400,0 ANTICIPATED ERRONEOUS RESULT. 
:FPS BEFORE EXECUTION 
FPS AFTER EXECUTION. | 
zANTICIPATED ERRONEOUS FPS. 
EXPECTED FEC. 
+343 REPORT RESULT INCORREC7. 
+323 REPORT FPS INCORRECT. 


(OCT), AC MOST NEG LONG INT, FL=1 


SEQ 0159 


ee 


am 


CKEPCAO FPIIF FLTG PNT 
172 STUDI AND STCDL TEST 
6463 
6464 035542 
035542 104413 
6465 035544 004737 035654 
6466 035550 150000 000000 
035556 000000 
6467 035560 100000 000000 
035564 000000 000000 
6469 035570 040700 
6470 035572 0406710 
6471 035574 140705 
6472 035576 177777 
6473 035600 104344 
6474 035602 01 
6475 035604 104323 
6476 035606 
6477 
6478 
6479 
6480 035606 
35606 104413 
6481 035610 004737 035654 
6482 035614 144000 000001 
035622 000000 
6483 035624 100000 177777 
84 035630 100000 177400 
6485 035634 040600 
6486 035636 040610 
6487 035640 140605 
6488 035642 177777 
6489 035644 104345 
6490 035646 01 
6491 035650 104323 
6492 
6493 035652 000534 
6494 
6495 
6496 
6497 
6498 
6499 
6500 
6501 
6502 
6503 
6504 
6505 
6506 
6507 
6508 
6509 
6510 
6511 
6512 
6513 
6514 
6515 


E 1 
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MACRO M1111 
iFIC=1 
wwC17: 
LPERR 
JSR 
000000 1$: WORD 
es: WORD 
3$: WORD 
4$: 40700 
40710 
alg 
5$: ERROR 
BR 
ERROR 
6$: 
sExXP=20, AC 
WwWwC18: 
LPERR 
JSR 
000000 1$: . WORD 
2$: . WORD 
3$: . WORD 
4$: 40600 
40610 
_ 
5$: ERROR 
ERROR 
6$: BR 


3 THIS SUBROUTINE, STCSUB, 


PC 800.0 O° 


156000,0,0,0 


1000000 
0.0 


;SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE THE INSTRUCTION. 
ACO OPERAND. 


Py 


EXPECTED RESULT. 
ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE EXECUTION. 
gPPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


SEXPECTED FEC 


+344 
6 
+323 


PC ,@#STCS 
144000, 1 “0. 0 


100000, -1 
100000, 177400 


; (BUT NBIT) ST 654 
[OR (BUT COUT) ST 454 
REPORT FPS INCORRECT. 


= MOST NEG INTEGER, FL=0, FIC=1 


SET UP THE LOOP ON ERROR ADDRESS. 
:GO EXECUTE THE INSTRUCTION. 
;ACO OPERAND. 


EXPECTED RESULT. 

ANTICIPATED ERRONEOUS RESULT. 
FPS BEFORE chy Ae oh 
FPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


sEXPECTED FEC. 


+345 
6$ 

+323 
WwC DONE 


; (BUT FL) ST 633 
TO 655 INTO 654 
REPORT EPs INCORRECT. 


IS USED TO SET UP THE OPERANDS, EXECUTE 


THE STCDI OR STCDL INSTRUCTION AND CHECK THE RESULTS. A CALL 
370 IT IS MADE THUS: 


‘THE OPERANDS ARE SET UP ( 


; THE RESULT IS CHECKED AGA 


JSR PC ,@#STCSUB 
ACAR -WORD X,X,X,X :AC_OPERAND 
RES: “WORD X.X EXPECTED RESULT 
ERRES: .WORD X,X ERROR RESULT 
PSB: «WORD xX FPS BEFORE EXECUTION 
FPSA: «WORD xX i FPS ree EXECUTION 
ERFPS: .WORD X TERROR FPS. 
FEC: «WORD X EXPECTED FEC 
ERR1 ERROR +X DATA ERROR. 
R CONT 

ERR2: ERROR +X FPS ERROR. 
CONT: RETURN ADDRESS 

ING ACO AS THE ACCUMULATOR). THEN 

ION IS EXECUTED. 

a ie che THE RESULT IS CORRECT THEN THE FPS [S 


US 
THE STCDI OR STCDL ogy 
Ss 


; COMPARED WITH FPSA IF THI 


ORRECT STCSUB RETURNS CONTROL 


SEG 0160 


F 1 
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STCDI AND STCDL TEST SEQ 0161 
6516 TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STCSUB 
6517 ; COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN STCSUB WILL RETURN 
6518 TO THE ERROR CALL AT ERR2, OTHERWISE STCSUB ITSELF 
6519 SREPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 
6520 :STCD! OR STCDL IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
6521 ZANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 
6522 :THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN STCSUB 
6523 [WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 
6524 RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STCSUB WILL 
6525 REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


6526 

6527 035654 012601 STCSUB: MOV (SP) +,R1 :GET A POINTER TO THE ARGUMENTS. 
6528 035656 012700 000200 MOV —- #200,RO SET UP THE ACO OPERAND. 
6529 035662 170100 LDFPS RO 

6530 035664 010100 MOV R1,RO 

6531 035 172610 LDD (RO) ,ACO 

6532 035670 012702 036134 MOV #STCIBF ,R2 SINITIALIZE THE OUT PUT BUFFER. 
6533 035674 012700 000004 MOV #4 ,RO 

6534 035700 012722 177/77 1$: MOV #-1,(R2)+ 

6535 035704 077003 SOB RO, i$ 

6536 035706 016100 000020 MOV 20(R1) .RO SET THE FPS. 

6537 035712 170100 LDFPS RO 

6538 035714 012737 035726 001236 MOV #2$ ,awSTMP2 

6539 035722 012700 036134 MOV #STCIBF ,RO 

6940 035726 175410 2$: STCDL ACO, (ROS TEST INSTRUCTION. 

6542 035730 170204 STFPS RG GET THE FPS. 

6545 035732 170305 STST RS ZGET THE FEC. 

6544 035734 010102 MOV : 

6545 035736 010237 001240 MOV R2. aASTMP3 

6546 035742 062702 0 ADD x 

6547 035746 010237 001244 MOV R2,a4STMPS 

6548 035752 012737 036134 001242 MOV  —- #STCIBF , aa STMPG 





6549 035760 010437 001250 MOV R4 ,@4$TMP7 
6550 035764 016137 000022 001252 MOV 22(R1) ,@#$TMP10 
6551 035772 010102 MOV R1,R2 
6552 035774 062702 000010 ADD 710,82 
6553 036000 012700 036134 MOV #STCIBF ,RO SEE IF THE RESULT IS CORRECT. 
6554 036004 012703 000002 MOV #2 ,R3 
6555 036010 022022 3$: CMP (RO) +,(R2)+ 
6556 036012 001014 BNE 15$ 
6557 036014 077303 SOB R3,3$ 
6558 036016 016102 000022 MOV 22(R1) ,R2 
6559 036022 020204 CMP R2,R4 SEE IF THE FPS IS CORRECT. 
6560 036024 001025 BNE 20$ ;BRANCH IF INCORRECT. 
6561 036026 005702 TST Re 
6562 036030 100003 BPL 4$ 
6563 036032 026105 000026 CMP 26(R1) ,R5 ;SEE IF THE FEC IS CORRECT. 
6208 036036 001027 BNE 25$ BRANCH IF INCORRECT. 
6566 036040 000161 000036 4$: JMP 36(R1) ;RETURN. 
6567 ;DATA ERROR: ; 
6568 SEE IF THE FAILURE WAS ANTICIPATED. ‘ 
6569 036044 010102 15$: MOV R1,R2 
6570 036046 062702 000014 ADD #14,R2 
6571 036052 012700 036134 MOV #STCIBF ,RO 
e 012 00000 #2,R3 


* 


CKEPCAQ FPI7F FLTG PNT PRT C 
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6573 036062 


Oo 
g 
oo OOOO 
RR OB RK 


—~  s 
WWwr— 


-_—_— 


Oo 
Ww 
oO 
wW 
olelele) 
MOO 


036134 
036142 


036144 
036144 


6620 036200 


022022 
001003 


0000 30 


000024 
0000 34 


000026 
001254 


177777 


035654 
177777 


177600 
177777 


MACRO M1117 
168: CMP (RO) +, (R2)+ 
BNE 17$ 
508 R3,16$ 
my MP 30(R1) 
:FAILURE WAS NOT ANTICIPATED SO REPORT INCORRECT RESULT HERE. 
48%: ERROR +322 :DATA BAD 
:FPS INCORRECT, SO SEE IF FAILURE WAS ANTICIPATED. 
50$: CMP R4,24(R 
BNE 21$ 
- JMP 34 (R1) 
-NOT ANTICIPATED SO REPORT BAD FPS HERE. 
52$: ERROR +323 :FPS BAD 
4$ 
; :REPORT INCORRECT FEC 
001256 25$: MOV 26(R1) . aa$TMp12 
MOV R5,a@4$STMP11 
26$: ERROR tral 
BR 4$ 
:DATA BUFFER: 
177777 STCIBF: .WORD <-1,-1,-1,-1 
wWwCDONE : 
RSETUP :GO INITIALIZE THE FPS AND STACK; AND 
‘SEE IF THE USER HAS EXPRESSED 
‘THE DESIRE TO CHANGE THE SOFTWARE 
‘VIRTUAL CONSOLE SWITCH REGISTER (HAS 
‘THE USER TYPED CONTROL G?) 
Pea RES RRS RRA SSR S RSA SRRSRRR SRSA SR RRR RRR RRR RRR RRRRR RRS RR SRS RRR RRS SY 
T*TEST 73 STCFL AND STCFI TEST 
t* THIS IS A TEST OF STCFL AND STCFI. IT 
>* MAKES USE OF THE SAME SUBROUTINE, STCSUB. 
* WHICH WAS USED TO TEST STCDL AND STCDI. 
VERO AR RRRRRRRRSRSE SRR SSERRRSRRSRR RR RR RRR RRRARRRSRRRRRRR SRE RRA RRR ER SD ; 
15173: SCOPE 
sEXPONENT=37, FL=1 
MMC1: 
LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
JSR PC a¥STCSUB *GO EXECUTE THE INSTRUCTION. 
177777 1$: “WORD 47777,-1,-1,-1 :ACO OPERAND. 
2$: -WORD 77777,177600 SEXPECTED RESULT 
3$: "WORD =. 77777.177777 SANTICIPATED ERRONEOUS RESULT. 
4$: 40100 :FPS BEFORE EXECUTION. 
40100 “FPS AFTER EXECUTION, 


G1 
24-SEP=79 15:03 PAGE 27-11 


SEQ 0162 a 


H_1 
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eae FPIIF FLIG PNT PRT C MACRO M1111) 24=SEr=79 15:03 
173 STCFL AND STCFI TEST 
6621 036202 177777 -1 ;ANTICIPATED ERRONEOUS FPS. 
$622 036204 177777 al. sEXPECTED FEC. 
6623 036206 104346 5$: ERROR +346 3X1101,0)40 ST 773x 
6624 936210 000401 BR 6$ 
6625 036212 104323 ERROR +323 ;REPORT FPS INCORRECT. 
6626 036214 6$: 
6627 
6628 036274 XXCDONE : 
036214 104412 RSE TUP 3GO_ INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
7; THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 
6629 
6630 
6637 SERRA RRR EERE ERR ERE EERE REE ERE ee 
:*TEST 74 STEXP TEST 
:* THIS IS A TEST OF THE STEXP 
>* INSTRUCTION 
we 
EetITIttiititiitititiiiititii iii 
“ete 036216 000004 1TST74: SCOPE 
6639 ; EXP = 100 (EXCESS 200) 
6640 036220 YYC1: 
036220 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
6641 036222 004737 036506 JSR PC ,a@#STXSUB 
6642 paocee 020000 000000 000000 1$ -WORD 20000,0,0.0 3AC 
6643 036236 177700 2$ -100 sEXP RES 
6644 036240 052525 3$ 52525 2 ae EXP. 
6645 036242 4$ 40000 PSB 
6646 036244 040010 40010 ESA 
6647 036246 0000 40000 ZERROR FPS 
6648 036250 104347 5$ ERROR +347 [BAD EXP 
6649 036252 000401 BR 6$ 
6650 036254 104352 ERROR +352 ;+(BUT ENBT) ST 376 
6651 036256 6$: 
6652 
6653 3 EXP = 200 (EXCESS 200) 
6654 036256 YYC2: 
036256 104413 LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 
6655 036260 004737 036506 JSR PC ,@4STXSUB :GO EXECUTE THE INSTRUCTION. 
6656 036264 040000 000000 000000 1$: -WORD 40000,0.0.0 ;ACO OPERAND. 
036272 000000 
6657 036274 000000 2$: 0 EXPECTED EXPONENT RESULT. 
6658 036276 052525 3$: 52525 ANTICIPATED ERRONEOUS RESULT. 
6659 036300 040000 4$ 40000 S BEFORE ty ht ee 
036302 040004 40004 ‘Eps AFTER EXECUTION 
6661 036304 040000 40000 ANTICIPATED ERRONEOUS FPS. 
036 104347 5$ ERROR +347 ;REPORT RESULT INCORRECT. 
6663 036310 01 BR 6$ 
6664 036312 104353 ERROR +353 7 (BUT _EZBT) ST 071 
370 072 INT 272 
6666 036314 $: 


SEQ 0163 





CKFPCAO FRITF FLTG PNT PRT C 
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174 


6669 
6670 peeele 
036314 
6671 036316 
6672 036322 
36330 
6673 Otte 


6681 036352 
6682 
6683 
6684 
6685 036352 


6691 036376 
6692 036400 


036506 
000000 


036506 
000000 


1_13 
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MACRO M1111 
; EXP = 201 
vYC3: 
LPF AR 
JOA 
000000 1$: . WORD 
2$: 
3$: 52525 
4$: 40000 
40000 
40004 
S$: ERROR 
ERROR 
6$: 
3 EXP = 375 
YYCSG 
LPERR 
JSR 
000000 1$: . WORD 
2$: 75 
3$: 52525 
4%: 40000 
40000 
40010 


(EXCESS 200) 


PC aS TXSUB 
40200,0,0,9 


;SET UP THE LOOP ON ERROR ADDRESS. 


:GO EXECUTE THE INSTRUCTION. 
;ACO OPERAND. 


EXPECTED EXPONENT RESULT. 


ANTICIPATED ERRONEOUS RESULT 


+347 
6$ 
+354 


(EXCESS 200) 


PC ,@#STXSUB 
77200,0,0,0 


PS BEFORE EXECUTION. 
EDS AFTER EXECUTION. 
ZANTICIPATED ERRONEOUS FPS. 
[REPORT RESULT INCORRECT. 


; (BUT_EZBT) ST_Q71 
TO 272 INTO 072 


;SET UP THE LOOP ON ERROR ADDRESS. 


"GO EXECUTE THE INSTRUCTION, 
[ACO OPERAND. 


;EXPECTED EXPONENT RESULT. 


;ANTICIPATED ERRONEOUS RESULT. 


FPS BEFORE EXECUTION. 
SFPS AFTER EXECUTION. 
ANTICIPATED ERRONEOUS FPS. 


SEQ 0164 


CKFPCAD FP11F FLTG PNT PRT C 


STEXP TEST 
66% 036402 104347 
6695 036604 000401 
6696 0 104355 
6697 036410 
6698 
6699 
6700 
6701 036410 
036410 104413 
6702 036412 004737 
6703 036416 000200 
036424 
6704 036426 177601 
6705 036430 052525 
6706 036432 
6707 036434 040010 
6708 036436 
6709 036440 104347 
6710 036442 000401 
6711 036444 104352 
6712 036446 
6713 
6714 
6715 
6716 036446 
036446 104413 
6717 036450 004737 
6718 036454 033400 
0364 
6719 036464 177756 
6720 036466 052525 
6721 036470 047707 
6722 036472 047710 
6723 036474 177777 
6724 036476 106347 
6725 036500 01 
6726 036502 104350 
6727 
6728 036504 000510 
6729 
6730 
6731 
6732 
6733 
6736 
6735 
6736 
6737 
6738 
6739 
6740 
6741 
6742 
6743 
6744 
6765 
6746 


MACRO M1111 


S$: 


036506 
000000 000000 1$: 


036506 
000000 000000 1$: 


5$: 


6$: 


: THIS SUBROUTINE, STXSUB, 


24-SEP-79 15:03 


ERROR 
BR 
ERROR 


+347 
6$ 
+355 


= 1 (EXCESS 200) 


= 156 


Ti ht 


J1 
PAGE 28 


REPORT RESULT INCORRECT. 


; (BUT_ENBT) ST 376 
370 471 INTO 071 


SET UP THE LOOP ON ERROR ADDRESS. 
:GO ae INSTRUCTION. 


00,0,0,0 ACO OPERAN 


+347 
6$ 
+352 


PC, a4STXSUB 
33400,0.0,0 


+347 
6$ 
+350 


YY CDONE 


;EXPECTED EXPONENT RESULT. 
:ANTICIPATED ERRONEOUS RESULT. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

;ANTICIPATED ERRONEOUS FPS. 

;REPORT RESULT INCORRECT. 


;REPORT FPS INCORRECT. 


(EXCESS 200) 


:SET UP THE LOOP ON ERROR ADDRESS. 
3GO EXECUTE THE INSTRUCTION. 
;ACO OPERAND. 


EXPECTED EXPONENT RESULT. 
;ANTICIPATED ERRONEOUS RESULT. 

FPS BEFORE EXECUTION. 

SFPS AFTER EXECUTION. 

SANTICIPATED ERRONEOUS FPS. 

;REPORT RESULT INCORRECT. 


REPORT FPS INCORRECT. 


IS USED TO SET UP THE OPERANDS, EXECUTE 


THE STEXP INSTRUCTION AND CHECK THE RESULTS. A CALL 
:TO IT IS MADE THUS: 


JSR 
ACARG: 
RES: 
ees? 
PSB: 
PSA: 


ERFPS: 
ERR1: 


ERR2: 
CONT: 


PC ,@#STXSUB 

«WORD X,X,X,X C OPERAND 

“WORD =X EXPECTED RESULT 
«WORD X ERROR RESULT 

«WORD xX :FPS BEFORE EXECUTION 
«WORD X [FPS AFTER EXECUTION 
-WORD  X ERROR FPS. 

ERROR +X DATA ERROR. 
BR CONT 

ERROR +X FPS ER 


ROR. 
[RETURN ADDRESS 


: THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 


SEQ 0165 


CKFPCAO FP1IF rect PNT PRT C 


174 


STEXP TES 


012601 


kK 13 


MACRO M1111 24=SEP=79 15:03 PAGE 28-1 


001236 
036714 
036716 


036714 
036714 


THE STEXP_INSTRUCTION IS EXECUTED. 

7; THE RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
COMPARED WITH FPSA_IF THIS TOO IS CORRECT STXSUB RETURNS CONTROL 

TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD STXSUB 

:COMPARE IT TO ERROR FPS. IF THIS MATCHES THEN Sy WILL RETURN 

:TO THE ERROR CALL AT ERR2, OTHERWISE STXSUB ITSELF 

:REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 

:STEXP IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 

ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 


WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR1. OTHERWISE THE 
RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND STXSUB WILi 
REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


STXSUB: coer ake" RI ;GET A POINTER TO THE ARGUMENTS. 
V 
MOV Oe a¥$TMP3 
ADD oR 
MOV (RaS a4STMPS 
MOV aS TMP 


2 
MOV #128056. ane TXBF 
MOV #76543, a#STXBF +2 
MOV #200,R0 


LOFPS RO 
MOV R1,RO ;SET UP THE ACO OPERAND. 
LDD (RO) ,ACO 
MOV 16(R1) ,RO ;SET THE FPS. 
LDFPS RO 
MOV 4STXBF .RO 
1$: STEXP ACO,(RO) ZTEST INSTRUCTION, 
STFPS R4 ;GET FPS. 


R4,a4STMP7 
MOV 16(R1) ,a#STMP10 
MOV @ASTXBF , aA STMPS 
CMP 10(R1) ,@A#STXBF ;WAS RESULT CORRECT? 
BEQ 5$ “BRAN CH IF CORRECT 


CMP 12(R1),@HSTXBF ZOTHERWISE SEE IF THE FAILURE WAS ANTICIPATED. 


JMP 22(R1) 
iif NOT ANTICIPATED REPORT ERROR HERE. 


3$: ERROR +347 SEXP BAD 
4$: JMP 30(R1) 
S$: CMP R4,16(R1) :SEE IF THE FPS IS CORRECT. 
BECO 10$ “BRANCH IF CORRECT. 
CoP R4,20(R1) [SEE IF THE FAILURE WAS ANTICIPATED. 


6$ 

JMP 26(R1> 

EPS ERROR WAS NOT ANTICIPATED SO REPORT ERROR HERE. 

7$: ERROR +350 :FPS BAD 
BR 4$ 


SEE IF MORE THAN ONE WORD WAS WRITTEN IN THE OUTPUT BUFFER, 


SEQ 0166 


‘Slag FP1IF FLTG PNT 
174 STEXP TEST 


6804 036676 
6805 036704 
6806 036706 
6807 036710 
6808 


6829 
= 036742 





6852 037062 





022737 
760 


177777 
177777 
177777 


104412 


7 
012737 
022710 






PRT C 








076543 


177777 
177777 


040000 


037120 


037120 
001240 
000002 


000002 
036742 
001250 
149000 
000002 
036742 
140000 
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MACRO M1111 
036716 108: CMP #76543, AS TXBF +2 
BEQ 4$ 
11$: ERROR +351 sFDFL*O ST 347x 
BR 4$ 
-1 
177777 =STXBF: .WORD <-1,-1,-1,-1,-1 
YYCDONE : 
RSE TUP 3;GO INITIALIZE THE FPS AND STACK; AND 
sSEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 
SARA AARAARAERRAARAREERAARAKRAREARREERERRARAERAKEREREAAERRERER EERE 
s*TEST 75 STST TEST 
** 
* THIS IS A TEST OF THE STST 
:* INSTRUCTION. FIRST AN ILLEGAL oe OP CODE 
te (INSTRUCTION) IS USED TO ENTER 
te ERROR CONDITION IN THE FEC pa 
ie FEA. THE STST IS EXECUTED AND 
z* THE FEC AND FEA ARE CHECKED 
** 
ETTITITIT TTT Tit t iti ti ttt iti tititititi ttt ict itt i titi t titi tiie ts 
TST75: SCOPE 
77ZC1: 
LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
V #40000 ,RO sSET FPS. FID=1. 
LDFPS RO 
Z772C2: . WORD 170003 7 ILLEGAL FPP 
;OP CODE 
MOV #7ZCBF RO 7SET UP THE OUTPUT BUFFER. 
MOV #-1, (RO) 
000002 MOV #-1,2(RO) 
001236 MOV #7703, a4STMP2 
27C3: STST (RO) AH FEC AND 
STFPS R4 GET FPS. 
V 4#77CBF .RO 
MOV (RO) aa$T MP3 
001242 MOV 2 (RO) =e 
001244 MOV #2 ,aASTMPS 
001246 MOV #2202 ors TIPS 
MOV R4, TMP7 
#140000, a#$TMP10 


#2,(RO) ;SEE IF FEC IS CORRECT. 
BNE 27Z¢5 BRANCH IF INCORRECT. 
CMP ogets -€ (RO) 7SEE IF FEA, veatt IS CORRECT. 


;BR 
#140000 ,.R4 :SEE IF FPS IS CORRECT. 
22¢15 ;BRANCH IF INCORRECT. 





SEQ 0167 | 
























M1 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 
T75 STST TEST SEQ 0168 


Seer 037064 000422 BR ZZCDONE 
ORT FEC INCORRECT 


6857 037066 104356 1205: ERROR +356 
6858 037070 000420 BR 22CDONE 


6860 eo ol FEA ss 
6861 Beene 022760 177777 000002 72210: CMP 1,2(RO) 
02 BEQ 77c19 


ERROR +357 ;STST BAD FEA 
BR ZZCDONE 


6866 037106 ERROR +360 ;SET FD FL ST 636 
6867 037110 BR ZZCDONE 

6869 ;REPORT FPS INCORRECT 

6870 037112 2ZC15: 

6871 037112 1$: ERROR +361 FPS x AFTER ST ST 
oars 037114 000406 BR ZZCDONE 


6874 DATA BUFFER: 
6875 037116 177777 -1 
6876 037120 177777 177777 #177777 JZZCBF: .WORD <-1,-1,-1,-1 
037126 177777 ‘ 
6877 037130 177777 -1 
6878 
6879 037132 ZZCDONE : 
037132 104412 RSET :GO INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
:VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G?). 





CKFPCAO FP11F FLTG PNT 
176 


ENABLE D=-SPACE AND SE 


6888 


34- 000004 


037134. 
6889 037136 
03 


7136 
6890 037140 
6891 037144 
6892 


6893 oe 50 


6905 037250 
6906 

6907 037256 
6908 264 


6911 0 
at 037314 
6913 

6914 037322 


6929 037434 
6930 
6931 037442 
6932 


104413 
005067 
170127 
012767 


012767 
012767 


012767 
016767 


012737 
170000 


PRT C 
E 


000024 
177572 
117760 


MACRO _ M1111 


I-SPACE IS FORCE 


— 15:03 PAGE S9. 





SEQ 0169 


MASA EARARALASZASLASALAZALAAAASASLASALALSSSSALE SALAS EEA R ESSER SSSR S SEES SY 


: TEST 76 


ENABLE D-SPACE AND SEE I-SPACE IS FORCED 


THIS IS A TEST THAT WILL ENABLE D-SPACE BUT MAKE IT yo ee 
;*SO THAT AN ven ie THAT os D-SPACE WHEN IT NORMALL 


s* 


'MmASARRALRALASAAASAAALALALASAASARALASLASALAS ERASE AAR ESSASAL ALES A AAS SS | 


18176: 


Z27F 1: 


132772 
141670 


000250 
000252 
172516 


;*SHOULDN'T WILL CAUSE A TRAP/ 
SCOPE 
LPERR 
CLR MMRO 
LDFPS #40000 
MCV #77406, KDPDRO 
MOV #77400, KDPDR1 
MOV #77400 ,KDPDR2 
MOV #77000 ,.KDPDR5 
MOV #77406, KDPDR4 
MOV #77406 ,.KDPDR7 
CLR KDPARO 
MOV #200 ,KDPAR1 
MOV #400 ,KDPAR2 
MOV #600 ,.KDPAR3 
MOV #600 ,KDPARS 
MOV #177600 ,KDPAR7 
MOV #77406. KIPDRO 
MOV #77406,KIPDR1 
MOV #77406, KIPDR2 
MOV #77006, KIPDR3 
MOV #77400 ,.KIPDR4 
MOV #77406, KIPDR7 
CLR KIPARO 
MOV #200, KIPAR1 
MOV #400 ,KIPAR2 
MOV #600 ,KIPAR3 
MOV #600 ,KIPAR4 
MOV #177600 ,.KIPAR7 
MOV MMVE : T,STMP14 
MOV #DATA,R1 
MOV #DATA+10,R2 
MOV #DATA+12,R3 
MOV #TRAPV, aAMMVE CT 
MOV #340, aAMMVECT+2 
MOV #24 , GAMMRS 
INC asMmRrod 
MOV ADATA,@ADATA+10 ; 


117770 


;SET UP THE LOOP ON ERROR ADDRESS. 
[MAKE SURE MEMORY MANAGEMENT IS OFF. 
;LOAD FPS STATUS. 


KDPDRO RESIDENT. 
KDPDR1 NON-RESIDENT. 
on NON-RESIDENT. 

DPDR3 NON-RESIDENT FOR ADDRESSES 60000-77756. 
KDPDRG RESIDENT FOR a 77760-77776. 
KDPDR7 RESIDENT (1/0 PAGE) 


;MAP D-PAGE 0 FOR 0-4K. 
;MAP D-PAGE 1 FOR Pe 


OR ACCESSING ADDRESSES 77760-77776. 
FOR 1/0 PAGE. 


;MAKE KIPDRO RESIDENT. 

;MAKE KIPDR1 aeiiseed” 

;MAKE KIPDR2 RESIDE 

sMAKE KIPDR3 RESIDENT "FOR USING ADDRESSES 60000-77756 
KIPDR4 NON-RESIDENT FOR USING ADDRESSES 77760-77776. 

“MAKE KIPDR7 RESIDENT (1/0 PAGE). 


; MAP I-PAGE 0 FOR 0-4K. 
I-PAGE 1 FOR 4-8K. 
I-PAGE 2 FOR 8-12k. 
I-PAGE 3 FOR ACCESSING ADDRESSES 60000-77756. 
I-PAGE 4 FOR ACCESSING ADDRESSES 77760-7777€. 
I-PAGE 7 FOR I/0 PAGE. 


zsMOVE MM TRAP VECTOR TO $TMP14 FOR TEMP STORAGE. 
SET UP R1. 

SET UP Re. 

SET UP R3. 

;SET UP FOR FP TRAPS FOR THIS TESi. 


: TURN ON 22-B1T ose D-SPACE. 
; TURN GEMENT . 


: 0 
: 1 FOR 

- SMAP D=PAGE 3 FOR ACCESSING ADDRESSES 60000-77756. 
: 7 


ON MEMORY MANA 
>SET UP ADDRESS POINTER. 


:* TEST INSTRUCTION WHICH SHOULD ae D-SPACE. 


CFCC 
;* THIS INSTRUCTION WILL TEST FOR A WORST-CASE HARDWARE PR 


j*****ALL REFERENCES TO MICRO-FLOWS REFER TO *FP11-F=2 REV At FLOWS**ee2 
THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO FLOWS 





B14 
CKFPCAO FPE11F FLTG PNT PRT C MACRO M1111 . -SEP=79 15:03 PAGE 29-1 
176 ENABLE DSPACE AND SEE I-SPACE IS FORCED SEQ 0170 
;AND PINPOINT THE PROBLEM AREA. FROM THERE, HARDWARE ANALYSIS SHOULD BE EASIER. 

;* INSTRUCTION GROUPS ISOLATED BY BLANK LI inés ARE TO BE EXECUTED TOGETHER 

:* DUE _TO PROPER SETUP PURPOSES. 1.E£. THE LOCATION OR ADDRESS HAS TO BE 

:* INITIALIZED PROPERLY BEFORE THE INSTRUCTION CAN BE ACCOMPLISHED. 


:* TESTING MODE 1 REG 0. 


“waa 


6947 037454 
6948 
6949 
6950 
6951 037456 
6952 037460 
6953 037462 
6954 
6955 037466 
6956 037470 
6957 


6961 
6962 037472 
6963 
6964 037476 


6965 037500 
6966 037502 
6967 


6968 037506 

6969 037510 

6970 037512 

6971 

6972 037516 

6973 037520 

6974 037522 

6975 

6976 

6977 

6978 037526 

6979 037530 
037532 

6982 037536 

6983 037540 

6984 037542 

6985 

6986 037546 


6987 037550 
6988 037552 
989 


6992 037562 


170527 


010100 
170420 


170427 


010100 
177020 
177027 


010100 
172420 
172427 


010100 
170320 
170327 


1770 
177037 
10200 


0 
172430 
172437 


117760 


117760 


117760 


117760 


STST 


(RO) 


SETTING UP RO. 
: TESTING BLOCKS 27=-K AND 27-R. 


: TESTING BLOCKS 33-¢ AND 33-P. 


3* TESTING MODE 2 REG 0 AND 7. 


MOV 
TSTF 
TSTF 


MOV 


TES 
: THE LOCATION AFTER THE CLR 


SETTING UP RO. 
; TESTING BLOCK 21-AA. 


eerie i RO. 
TING — 27-K AND 27-R 


>*WILL*® BE CHANGED ON SUBSEQUENT PASSES, BUT IS **NOT** INCORRECT 


SACTUAL CONTENTS OF THOSE LOCATIONS IS IMMATERIAL, 
STHAT THE INSTRUCTION DOES EXECUTE WITHOUT ACCESSING THAT LOCATION AS 


3A D=SPACE ACCESS. 
CLRF #1000 


R1,RO 
(RO) +,ACO 
#1000,AC0 
R1,RO 
(RO) +,ACO 
#1000,ACO 
R1,R0 


(RO) + 
#1000 


; CORRECTING RO. 
; TESTING BLOCKS 28-F AND 28-P. 


CORRECTING RO.B 
s TESTING BLOCKS 4-NN, 4-X, 4-2 AND 4-88. 


; CORRECTING RO. 
TESTING BLOCKS 33-J AND 33-P. 


:* TESTING MODE 3 REG 0 AND 7. 


MOV 
TSTF 
TSTF 


MOV 
CLRF 
CLRF 


MOV 
LOCIF 
LOCIF 


MOV 
LOF 
LDF 


R2.RO 
a(RO)+ 
@4DATA 


R2,RO 


a(RO)+ 
@4DATA 


R2,RO 
a(RO)+,ACO 


@4DATA,ACO 


R2,RO 
a(RO)+,ACO 
@4DATA,ACO 


SETTING UP RO. 
TESTING BLOCK 21-N. 


CORRECTING RO. 
TESTING BLOCKS 27-U, 27-T AND 27-R. 


CORRECTING RO. 
TESTING BLOCKS 28-L, 28-N AND 28-P. 


CORRECTING RO. 
ZS TESTING BLOCKS 4-R, 4-T, 4-xX, 4-2 AND 4-BB. 





AND STST MODE 2 REG 7 7 pg 
AS THIS TEST INSURES 


C 14 
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E D=SPACE AND SEE I=SPACE IS FORCED SEQ 0171 
0375 010200 MOV R2,RO CORRECTING RO. 
6995 037570 170330 STST a(RO)+ TESTING BLOCKS 33-L, 33-N AND 33-P. 
ome 037572 170337 117760 STST @ADATA 
6998 :* TESTING MODE 4 REG 0. 
7000 037576 010200 MOV R2,RO ;SETTING UP RO. 
7001 037600 172440 LDF -(RO) ,ACO = TESTING BLOCKS 4-J, 4=X, 4=Z AND 4-88. 
2005 :* TESTING MODE 5 REG 0. 
7005 037602 010300 MOV R3,RO SETTING UP RO. 
7006 037604 170550 TSTF a-(RO) ; TESTING BLOCK 21-U. 
7008 037606 010300 MOV R3,RO CORRECTING RO. 
a4 037610 170450 CLRF a- (RO) : TESTING BLOCKS 27-X, 27=T AND 27-R. 
7011 037612 010300 MOV R3,RO CORRECTING RO. 
ele 037614 177050 LDCIF a-(RO),ACO TESTING BLOCKS 28-S, 28-N AND 28-P. 
7014 037616 010300 MOV R3,RO CORRECTING RO. 
we 037620 172450 LDF a-(RO),ACO : TESTING BLOCKS 4-U, 4-T, 4-x, 4-Z AND 4-88. 
7017 037622 010300 MOV R3,RO CORRECTING RO. 
a | 037624 170350 STST a-(RO) TESTING BLOCKS 33-S, 33-N ADN 33-P. 
rose 3* TESTING MODE 6 REG 7. 
7022 037626 170567 060126 TSTF DATA TESTING BLOCK 21- 
7023 037632 170467 060122 CLRF DATA TESTING BLOCKS ond 27-T AND 27- 
7024 037636 177067 060116 LDCIF DATA,ACO : TESTING BLOCKS 28-T, 28-N ADN 2. 
7025 037642 172467 060112 LDF =—- DATA, ACO “TESTING BLOCKS 4-DD. 4-1, 4-X, 4-Z AND 4-88. 
rss 037646 170367 060106 STST DATA S TESTING BLOCKS 33-1, 33-N AND 33-P. 
as z* TESTING MODE 7 REG 0 AND 7. 
7030 037652 010200 MOV R2,RO SETTING UP RO. 
7031 037654 170470 000000 CLRF @0(RO) “TESTING BLOCKS 27-GG, 27-JJ, 27-T AND 27-R. 
7032 037660 170477 060104 CLRF @DATA+10 
7033 037664 177070 000000 LDCIF  a@0(RO),ACO TESTING BLOCKS 28-W, 28-2, 28-N AND 28-P. 
7034 037670 177077 060074 LDCIF | @DATA+10,ACO 
7035 037674 172470 000000 LDF @0(RO) ,ACO TESTING BLOCKS 4-GG, 4-JJ, 4-T, 4-xX 4-2 AND 4-BB. 
7700 172477 060064 LDF @DATA+10,ACO 
7037 037704 170370 000000 STST a@0(RO) TESTING BLOCKS 33-W,* 33-2, 33-N AN 33-P. 
at. 037710 170377 060054 STST @DATA+10 
Ag 037714 000431 BR ENDTST BRANCH TO END OF TEST ROUTINE. 
7042 037716 042767 000001 137646 TRAPV: BIC #1 ,MMRO 7 TURN OFF MEMORY MANAGE 
7043 037724 016767 137642 141306 MOV MMRO, STMP3 ; TRANSFER MMRO TO $ SiMe FOR’ ERROR PRINTING. 
7044 037732 005267 141302 ~ INC $TMPS ‘REPLACE BIT CLEARED TURNING OFF MEMORY MANAGEMENT. 
7045 037736 016767 137634 141272 MOV MMR? , STMP2 ‘MOVE THE TRAP INSTRUCTION ADDRESS TO $TMP13. 
7046 037744 5067 137622 CLR MMRO CLEAR ERROR BITS. 
7047 037750 012667 141312 MOV (SP)+,$TMP16 ‘POP STACK AND SAVE 1ST CONTENTS. 
7048 037754 012667 141310 (SP)+,$TMP17 POP STACK AGAIN AND SAVE 2ND CONTENTS. 


MOV 
7049 037760 104362 ERROR +362 ;FPP TRAP/ABORT ERROR CALL. 


ma 
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7050 037762 016746 141302 MOV STMP17,-(SP) ;PUSH 2ND SAVED CONTENTS BACK ON STACK. 

7051 037766 016746 141274 MOV $TMP16,-(SP) :PUSH 1ST SAVED CONTENTS BACK ON STACK. 

7052 037772 005267 137574 INC MMRO ; TURN ON MEMORY MANAGEMENT . 

aie 037776 000002 RTI [RETURN FROM INTERRUPT. 

7055 040000 005067 137566 ENDTST: CLR MMRO : TURN OFF MEMORY MANAGEMENT. 

7056 040004 016767 141252 140236 MOV STMP14,MMVECT  :RESTORE MMVECT TO ITS ORIGINAL CONTENTS. 

7057 040012 IDONE : 

040012 104412 RSETUP :GO INITIALIZE THE FPS AND STACK; AND 

TSEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOF TWARE 
;VIRTUAL CONSOLE SWITCH 5 iat (HAS 

7058 ; THE USER TYPED CONTROL G?) 

7067 SLR 


T*TEST 77 AUTO INCREMENT/DECREMENT TEST 


* 

3* THIS TEST INSURES THAT AUTO INCREMENT/DECREMENT WORKS PROPERLY AND 

;* *ONLY* WHEN IT IS SUPPOSED TO. THIS IS DONE BY ENABLING 22-BIT KERNEL 
:* D-SPACE, BUT MAKING IT NON-RESIDENT, FORCING A MEMORY MANAGEMENT TRAP 
:* CONDITION. THIS ENABLES EXAMINING OF SR1 FOR PROPER CONTENTS. 

-* 


FARE REREEREEREEEREREREREEEEEREREERREREEKEEREKEE 


040014 000004 1S177: SCOPE 
7068 040016 INCDCT: 

040016 104413 LPERR :SET UP THE LOOP ON ERROR ADDRESS. 
7069 040020 005067 137546 CLR ‘MAKE SURE MEMORY MANAGEMENT IS OFF. 
7070 040024 170127 040000 LDFPS #40000 [LOAD FLOATING POINT STATUS. 

7071 040030 005067 141236 CLR $TMP20 *CLEAR THE TEMPORARY LOCATION. 

7072 040034 012767 002360 MOV #252, STOR 'CLEAR UPPER BYTE - ALTERNATING BITS IN LOWER BYTE. 
7073 040042 012767 125252 002354 MOV #125252, STORE+2 :MOVE ALTERNATING BITS TO 2ND WORD. 

7074 040050 012767 125252 002350 MOV #125252.STORE+4 :MOVE ALTERNATING BITS TO 3RD WORD. 

7075 040056 012767 125252 002344 MOV #125252.STORE+6 :MOVE ALTERNATING BITS TO 4TH WORD. 

7076 040064 172467 002332 LDF STORE ACO [LOAD ACO. 

7077 040070 172567 002326 LDF STORE .AC1 [LOAD AC}. 

7078 040074 172667 002322 LDF STORE .AC2 ‘LOAD AC2. 

7079 040100 172767 002316 LDF STORE .AC3 TLOAD AC3. 

040104 012700 042422 MOV MSTORE ,RO [MOVE ADDRESS OF STORE TC RO. 

7081 040110 012701 30 MOV #30,R1 “MOVE LOOP COUNTER (CLEARING 30 WORDS) TO R1. 

7082 040114 005020 1$: CLR (ROS + ;CLEAR T 

7083 040116 077102 SOB R1,1$ UBTRACT 1 FROM k1 AND BRANCH IF NOT 0. 
040120 174067 002276 STF ACO, STORE “STORE ACO. 

7085 040124 174167 002302 STF AC1.STORE+10 : STORE AC1 

7086 040130 174267 002 STF AC2.STORE+20  :STORE AC2. 

7087 040134 174367 002312 STF AC3.STORE+30 :STORE AC3. 

7O89 040140 012767 077406 132152 MOV #77406,KDPDRO :MAKE KDPDRO RESIDENT. 

7090 040146 012767 077406 132146 MOV #77406.KDPDR1 = :MAKE KDPDR1 RESIDENT. 

7091 040154 012767 077400 132142 MOV #77400.KDPDR2 MAKE KDPDR2 NON-RESIDENT 

7092 040162 012767 077406 132136 MOV #77406.KDPDR3  :MAKE KDPDR3 RESIDENT. 

7093 040170 012767 077406 132140 MOV #77406.KDPDR7 :MAKE KDPDR7 RESIDENT. 

7095 040176 012767 077406 132074 MOV #77406,KIPDRO ;:MAKE KIPDRO RESIDENT. 
040 012767 077406 132070 MOV #77406.KIPDR1 :MAKE KIPDR1 RESIDENT. 

7097 040212 012767 077606 132064 MOV #77406.KIPDR2 :MAKE KIPDR2 RESIDENT. 

7098 040220 012767 077406 132060 MOV #77406.KIPDR3  :MAKE KIPDR3 RESIDENT. 

7099 040226 012767 077406 132062 MOV #77406.KIPDR7  :MAKE KIPDR? RESIDENT. 


Aan 
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7105 040262 
7106 
7107 040270 


7111 040316 


SIAAIIVAIYA 


Me a 
OOONAUEWI 


040370 
7121 040376 


7156 040510 


012767 
016767 


012737 
012767 


132120 
000 


041242 
000 


137132 


132032 
140730 
000250 


132120 
002012 


MODE 1: 
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SEQ 0173 
CLR ARO ;MAP D=PAGE 0 FOR 0-4K. 
MOV #200, KDPAR1 iMAP D=PAGE 1 FOR 4-8K. 
MOV #400 ,KDPAR2 sMAP D=PAGE 2 FOR 8-12k. 
MOV #600 ,KDPAR3 sMAP D=PAGE 3 FOR 12-16K. 
MOV #177600,KDPAR7 :MAP D=PAGE 7 FOR I/O PAGE. 
CLR KIPARO sMAP I-PAGE 0 FOR 0-4K. 
MOV #200, KIPAR1 ;MAP I-PAGE 1 FOR 4-8k. 
MOV #400 ,KIPAR2 ;MAP I=PAGE 2 FOR 8-12k. 
MOV #600 ,KIPARS sMAP I=PAGE 3 FOR 12-16K. 
MOV 7177600, KIPAR7 ;MAP I-PAGE 7 FOR I/O PAGE. 
MOV MMVECT,STMP14 ;TEMPORARILY STORE THE MMVECT VALUE. 
MOV MTRPV ,QAMMVECT ;SET UP FOR FP TRAPS FOR THIS TEST. 
MOV 340, a4MMVECT+2 
MOV IOTRAP,STMP15 —; TEMPORARILY STORE THE IOTRAP VALUE. 
MOV #FALTRP, @#IOTRAP: SET UP FOR FAILURE OF TRAPS FOR THIS TEST. 
MOV #340, a#1OTRAP+2 


MOV #24 MARS TURN ON 22-BIT KERNEL D-SPACE. 


MOV #NODAT .NODAT+10 ;SET UP ADDRESS POINTER. 
MOV #NODAT ,RO SET UP RO. 

MOV #NODAT+10,R2 7SET UP Re. 

MOV #NODAT+12,R3 SET UP R3. 

MOV RO, STORE +40 ;STORE RO. 

MOV R2,STORE+42 sSTORE R2. 

MOV R3,STORE +44 on of R3. 

INC MMRO ; TURN ON MEMORY MANAGEMENT . 


p***eeALL REFERENCES TO MICRO-FLOWS REFER TO *FP11-F-2 REV A® FLOWS****« 
; THE COMMENTS FOR EACH TEST LINE ARE WRITTEN SO YOU CAN GO TO THE MICRO 


;FLOW AND PINPOINT THE PROBLEM AREA. 


FROM THERE, HARDWARE ANALYSIS SHOULD 


7* THE FOLLOWING TESTS ARE FOR MODE 0 REG 1 (THESE SHOULD *NOT* ABORT) . 


ZFDST-NOTCLR PAGE 21. 
F PAG 


:D - a 

TURN OFF MEMORY MANAGEMENT. 
RESTORE act. 

fod lJ AC1 

[TURN ON MEMORY MANAGEMENT. 


3* THE FOLLOWING TESTS ARE FOR MODE 1 REG 1. 


;BE EASIER. 

TSTF R1 

CLRF R1 

LDCIF  R1,ACO 
LDF R1,AC0 
STST R1 

CLR MMRO 

LDF STORE ,ACO 
LDF STORE ,AC1 
INC MMRO 

MOV RO,R1 

MOV RO ,R4 
TSTF (R1) 

IOT 

CLRF (R1) 

IOT 

LOCIF (R1),ACO 
oT 


SET UP R1. 

:MOVE "START" VALUE INTO R4. 
4S Linge ib eR PAGE 21. 
FORCE A 

sFDST moos *PAGE 27. 
FORCE A 


; SOURCE snopes; "PAGE 28. 
FORCE A 
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7157 040512 
7158 040514 
7159 040516 
ne 040520 


7164 040522 
7165 040524 


66 
7167 eres 
30 


7191 


7213 040646 


172411 
000004 
170311 
000004 


170521 
000004 


010001 
170421 
000004 


010001 
177021 
000004 


010001 
172421 
000004 


010001 
170321 
000004 


010201 
010204 
170531 
000004 


170537 


000004 
177037 
000004 


010201 
17243) 
000004 


172437 
000004 
010201 
170331 
000004 
170337 


042406 


042406 


042406 


042406 


042406 
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LABEL 1: 


SEQ 0174 
LDF (R1),ACO F SRC MODE S PAGE é. 
107 “FORCE A 
STST (R1) sDEST mODES ‘Pie 33, 
10T sFORCE A 
:* THE FOLLOWING TESTS ARE FOR MODE 2 REG 1. 
TSTF (R1)+ :EDST-NOTCLR PAGE 21. 
10T ‘FORCE A TRAP. 
MOV RO,R1 Z CORRECT R1. 
CLRF (Ri)+ FDS) MODE S ApAce 27. 
101 “FORCE A 
MOV RO,R1 : CORRECT 
LDCIF  (R1)+,ACO : SOURCE moves PAGE 28. 
10T “FORCE A T 
MOV RO.R1 : CORRECT R1. 
LDF (R1)+, ACO ZFSRC MODES PAGE 4. 
10T sFORCE A TRAP. 
“MOV RO,R1 : CORRECT R1. 
STST (R1)+ “DEST MODE S PAGE 33. 
10T sFORCE A 
:* THE FOLLOWING TESTS ARE FOR MODE 3 REG 1 AND 7. 
MOV R2,R1 :SET UP R1 FOR MODE 3. 
MOV R2,R4 *MOVE 'START' VALUE INTO RG. 
TSTF a(R1)+ [FDST-NOTCLR PAGE 21. 
10T [FORCE A TRAP. 
TSTF @ANODAT 
10T :FORCE A TRAP. 
MOV R2,R1 ZCORRECT R1. 
CLRF a(R1)+ :FDST MODES PAGE 27. 
{OT “FORCE A TRAP. 
CLRF @ANODAT 
i0T :FORCE A TRAP. 
MOV R2,R1 : CORRECT R1. 
LDCIF © a(R1)+,ACO : SOURCE MODES PAGE 28. 
10T “FORCE A TRAP 
LDCIF | @4#NODAT,ACO 
10T :FORCE A TRAP. 
MOV R2,R1 : CORRECT R1. 
LDF a(R1)+, ACO =F SRC MODE S PAGE 4. 
107 ‘FORCE A TRAP. 
LDF @FNODAT ACO 
10T :FORCE A TRAP. 
MOV R2,21 : CORRECT R1. 
STST  a(R1)+ “DEST MODE S apace 33, 
{OT “FORCE A 


STS? @ANODAT 
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177 AUTO INCREMENT/DECREMENT TEST SEQ 0175 
rie 040652 000004 I0T sFORCE A TRAP. 
S18 z* THE FOLLOWING TESTS ARE FOR MODE 4 REG 1. 
7218 040654 010201 MOV R2,R) SET UP R1 FOR MODE 4. 
7219 040656 170541 TSTF -(R1) sFDST=NOTCLR PAGE 21. 
rest 040660 000004 107 sFORCE A TRAP. 
7222 040662 010201 MOV R2,R1 CORRECT R1. 
7223 040664 170441 CLRF -(R1) ;FDST MODES PAGE 27. 
ress 040666 000004 10T FORCE A TRAP. 
7226 040670 0102061 MOV R2,R1 CORRECT R1 
7227 040672 177041 LDCIF =(R1),ACO > SOURCE MODES. PAGE 28. 
res 040674 000004 107 SFORCE A T 
7230 040676 010201 MOV R2,R1 ; CORRECT 
7231 040700 172441 LDF -(R1),ACO 7F SRC mDES PAGE 4. 
ree 040702 000004 Io? FORCE A TRAP. 
7234 040704 010201 MOV R2,R1 ; CORRECT 
7235 040706 170341 STST -(R1) SDEST nope PAGE 33. 
re%8 040710 000004 10T FORCE A TRAP. 
Se ;* THE FOLLOWING TESTS ARE FOR MODE 5 REG 1. 
7240 040712 010301 MOV R3,R1 ;SET UP R1 FOR MODE 5. 
7241 040714 010304 MOV R3,R4 SMOVE 'START' VALUE INTO RG. 
7242 040716 170551 TSTF a-(R1) :FDST-NOTCLR PAGE 21. 
eer 040720 000004 IOT sFORCE A TRAP. 
7245 040722 010301 MOV R3,Ri CORRECT R1. 
7246 040724 170451 CLRF a-(R1) sFDST — PAGE 27. 
ieee 040726 000004 IOT FORCE A TRAP. 
7249 040730 010301 MOV R3,R1 :CORRECT R1. 
7250 040732 177051 LDCIF @-(R1),ACO ;SOURCE MODES PAGE 28. 
C24 040734 000004 IOT FORCE A TRAP. 
7255 040736 010301 MOV R3,R1 CORRECT R1. 
7254 040740 172453 LDF a-(R1),ACO ;FSRC MODES PAGE 4. 
Ct] 040742 000004 10T FORCE A TRAP. 
7257 040744 010301 MOV R3,R1 ; CORRECT 
7258 040746 170351 STST a-(R1) DEST nope s PAGE 35. 
ety 040750 000004 IO0T FORCE A TRAP. 
eel ;* THE FOLLOWING TESTS ARE FOR MODE 6 REG 1 AND 7. 
7263 040752 010001 MOV RO,R1 ;SET UP R1 FOR MODE 6. 
7264 040754 010004 MOV RO,R4 [MOVE 'START' VALUE INTO RG. 
7265 040756 170561 000000 TSTF 0(R1) 4+ Lin a PAGE 21. 
7266 040762 000004 ; IO? SFORCE A TRAP. 
7267 040764 170567 001416 TSTF NODAT 
7268 040770 000004 IOT et an TRAP, 
7269 040772 170461 000000 CLRF O(R1) sFDST +4 me 7. 


7270 040776 000004 10? SFORCE A 


_ 
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170467 
000004 
177061 
000004 
177067 
000004 
172461 
000004 
172467 
000004 


162767 
012767 
047727 
001 366 
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001402 
000000 
001 366 
000000 
001352 
000000 
001336 


000002 
170000 
140052 
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CLRF NODAT 

1OT :FORCE A TRAP. 

LDCIF Q(R1),ACO ; SOURCE e4 PAGE 26. 
10T FORCE A 

LDCIF NODAT,ACO 

1OT FORCE A TRAP. 

LDF O(R1) ,ACO 7 F SRC noDES PAGE 4. 
1OT ;FORCE A TRAP. 

LDF NODAT ,ACO 

1OT ;FORCE A TRAP. 

STST O(R1) ;DEST 7 PAGE 33. 
IOT FORCE A TRAP. 

STST NODAT 

10T ;FORCE A TRAP, 





MOV R2,R1 ;SET UP R1 FOR MODE 7. 
MOV R2,R4 sMOVE ‘START’ VALUE TO R4. 
TSTF a@0(R1) sFDST-NOTCLR PAGE 21. 
IOT FORCE A TRAP. 
TSTF @NODAT +10 
10T FORCE A TRAP. 
CLRF a@0(R1) :FDST — PAGE 27. 
iOT ;FORCE A TRAP. 
CLRF @NODAT +19 
10T FORCE A 
LOCIF a0(R1),ACO ; SOURCE moves PAGE 28. 
IOT FORCE A 
LDCiF @NODAT+10,AC0 
I0T FORCE A 
LDF a@0(R1),ACO sF SRC MODES PAGE 4. 
10T FORCE A TRAP. 
LDF @NODAT+10,AC0 
10T FORCE A 
STST a0(R1) :DEST MODES PAGE 33. 
10T ;FORCE A TRAP. 
STST @NODAT +10 
10T FORCE A_TRAP 
JMP ENDTES “BRANCH TO END TEST. 
: CLR MMRO TURN OFF MEMORY MANAGEMEN 
MOV (SP) ,$TMP13 ;MOVE NEXT INSTRUCTION ADDRESS TO STMP13. 


; THIS NEXT SECTION NOW CORRECTS THE CONTENTS OF STMP13 SO THAT iT POINTS 
;TO THE PREVIOUS FPP INSTRUCTION. IT DOES THIS BY tpt The 2 FROM THE 


:AND BIT CLEARING THE INSTRUCTION WITH 170000. IF THE INSTRUCTION THAT 
:$TMP13 IS POINTING TO IS NOT AN FPP INSTRUCTION, THE 170000 WILL NOT 
[CLEAR, SATISFYING THE NEXT BRANCH. THE ADDRESS IS AGAIN CORRECTED, 
SAND THE TESTING PROCESS STARTS OVER. THIS CONTINUES UNTIL $TMP13 {S 
:POITING TO AN FPP INSTRUCTION, AND NORMALLY WILL NOT BE EXECUTED MORE 
‘THAN THREE TIMES BEFORE FINDING THE INSTRUCTION. 

SUB #2, $1MP13 : SUBTRACT 2 FROM $TMP13. 

MOV #170000, 2$+4 :SET UP BIC DATA LOCATION. 

BIC aSTMP15, #170000 : TEST TO SEE IF FPP INSTRUCTION. 
BNE 1$ [BRANCH BACK FOR ANOTHER TRY IF NOT. 
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AUTO INCREMENT/DECREMENT TEST SEQ 0177 
7328 041212 012667 140050 MOV lee" phy SAVE 1ST CONTENTS OF STACK AND POP IT ONCE. 
7329 041216 012667 140046 MOV (SP)+,$TMP17 ;SAVE 2ND CONTENTS OF STACK AND POP IT AGAIN. 
7330 041222 104364 ERROR +364 FAILURE TO ABORT ON INSTRUCTION ERROR. 
331 041224 016746 140040 MOV $TMP17,-(SP) ;PUSH 2ND SAVED CONTENTS BACK ON STACK. 
7332 041230 016746 140032 MOV $TMP16,-(SP) ;PUSH 1ST SAVED CONTENTS BACK ON STACK. 
7333 041234 005267 136332 INC MMRO ; TURN MEMORY MANAGEMENT BACK ON. 
Pees 041240 000002 A RTI RETURN FROM INTERRUPT. 
7336 041242 016767 136326 137766 TRPV: MOV SR1,$TMP2 ;MOVE SR1 TO STMP2 FOR TESTING 
7337 041250 016767 136322 140002 MOV MMR? , $TMP13 ioe aie ADDRESS OF INST. CAUSING TRAP TO $TMP13. 
7338 041256 005067 136310 CLR MMRO [TURN OFF MEMORY MANAGEMENT. 
7339 041262 112767 177776 140002 MOVB #-2,$TMP20 :MOVE =2 TO LOWER BYTE IN ERROR POINTER. 
7340 041270 022767 137762 CMP AMODE1,$TMP13 ;SEE IF INSTRUCTION CAUSING TRAP IS BEFORE MODE 1 (MODE 0). 
7341 041276 002402 BLT 1$ :BRANCH AROUND MODE 0 ERROR JUMP IF NOT. 
7342 041300 000167 000754 JMP 73$ ; JUMP TO ERROR NEST. 
7343 041304 017767 137750 137754 1$: MOV @$TMP13,$TMP16 :MOVE INSTRUCTION CAUSING TRAP TO $TMP16. 
7344 041312 112767 177777 137752 MOVB #-1,$TMP20 ;MOVE -1 TO LOWER BYTE IN ERROR POINTER. 
7345 041320 5067 137714 CLR $TMP3 CLEAR CALCULATED LOCATION. 
7346 0413 012767 041516 137712 MOV #65$,$TMPS :MOVE NEXT CHECK ADDRESS TO $TMP5. 
7347 041332 022767 040524 137720 CMP MLABEL1,$1MP13  ;SEE IF TRAP IS BEFORE MODE 2 REG 1 CLRF INST. 
7348 041340 100007 BPL 21$ [BRANCH TO SR1=0 TEST IF SO. 
7349 041342 012767 000060 000004 MOV #60 ,2$+4 ;SET_ UP BIC DATA POSITION. 
7350 041350 046727 137712 000060 2%: BIC $TMP 16,460 :TEST TO SEE IF MODE 6 OR 7 INSTRUCTION. 
7351 041356 001005 BNE 4$ BRANCH TO FURTHER TESTS IF NOT. 
7352 041360 005767 137652 21$: TST STMP2 TEST TO SEE IF SR1=0. 
7353 041364 001454 BEQ 65$ BRANCH TO NEXT CHECK IF OK. 
7354 041366 000167 000666 JMP 73$ TO ERROR NEST IF NOT. 
7355 THIS NEXT ROUTINE DETERMINES WHICH REGISTER WAS IN THE INSTRUCTION, AND 
7356 [LOADS THE START AND END VALUES OF EITHER R1 OR R7 (PROGRAM COUNTER) INTO 
7357 :STMP17 AND $TMP3 RESPECTIVELY. THEY ARE THEN SUBTRACTED TO FIND THE 
7358 DIFFERENCE THAT ACTUALLY OCCURED. IF NO DIFFERENCE WAS FOUND, THE TEST 
7359 :FOR ZERO IN SR1 IS ACCOMPLISHED. IF A DIFFERENCE y FOUND, THE DIFFERENCE 
7360 31S SHIFTED LEFT 3 PLACES, THE TOP BYTE IS te ge AND THE REGISTER 
7361 SOF THE INSTRUCTION IS ADDED. $TMP3 NOW CONTAINS T SHOULD APPEAR 
7362 :IN SRi, Pa a Mi WHAT ACTUALLY HAPPENED TO THE R REGISTER. 
7363 041372 042767 177770 137666 4$: BIC 177770, $1MP16 ;BIT CLEAR THE INSTRUCTION, LEAVING THE REG EXPOSED. 
7364 041400 026727 137662 000002 CMP SIMP16.a2 :COMPARE REGISTER TO DETERMINE IF IT IS REG 7. 
7365 041406 003005 BGT 5$ BRANCH TO THE REG 7 SETUP IF EQUAL TO REG 7. 
7366 041410 010467 137654 MOV R4,$TMP17 s;MOVE THE START VALUE TO STMP17. 
7367 041414 010167 137620 MOV R1,$1MP3 ;MOVE THE END VALUE TO STMP3. 
7368 041420 000410 BR 6$" ;BRANCH TO CONTINUE. 
7369 041422 016767 137632 137640 5$: MOV $7MP13,$TMP17 ;MOVE THE START VALUE TO $TMP17. 
7370 041430 062767 000002 137632 ADD #2,$1MP17 zADD 2 TO START VALUE FOR NORMAL INCREMENT ING. 
7371 041436 011667 137576 MOV (SP) , $TMP3 ;MOVE THE END VALUE TO $TMP3. 
7372 041442 166767 137622 137570 6$: SUB STMP17,STMP3 iF IND _ a lect fox THAT OCCURED 
7373 041450 001743 BEQ 21$ :BRANCH TO TEST FOR SR1=0 IF NO DIFFERENCE. 
7374 041452 006367 137562 ASL $TMP3 ARITHMETIC SHIFT LEFT STMP3 3 


75 0641456 006367 137556 ASL $TMP3 :PLACES TO PUT DIFFERENCE FOUND 


73 

7376 041462 006367 137552 ASL STMP3 7IN BITS 3 THROUGH 7. 

7377 041466 042767 177400 137544 BIC #177400,$TMP3 BIT CLEAR UPPER BYTE OF $TMP3. 

7378 0414 066767 137566 137536 ADD $TMP16,STMP3 ADD THE REGISTER THAT WAS CHANGED, 

7379 0415 026767 137530 137530 CMP STMP2 ,$TMP3 COMPARE SR1 WITH CALCULATED DATA. 

7380 0415 001402 BEQ 65$ BRANCH AROUND ERROR JUMP IF OK. 

7381 0415 000167 000446 JMP 7$ ; JUMP TO ERROR REPORT IF INCORRECT. 

7382 0415 032767 000400 137546 65$: BIT #400, $TMP20 :TEST TO SEE IF BIT 8 IS SET. 

7383 0415 001402 BEQ 66$ BRANCH AROUND AC SKIP. JUMP IF NOT. 

7384 0415 000167 000624 JMP 8$ ; JUMP TO RETURN ~ AC TESTS ARE TO BE SKIPPED. 
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SEQ 0178 


66$: CLRB = $TMP20 :CLEAR LOWER BYTE OF $TMP20 FOR ERROR CALL POINTING. 
MOV RO, STORE +56 : STORE RO FOR USE LATER IN THIS ROUTINE. 
CLR $TMP2 A 'O' IN "AC CHANGED’ LOCATION. 
137470 MOV #101$,$TMP5 : VE RETURN TO $TMPS. 
CMPF STORE .ACO ;SEE IF ACO WAS ED 
CFCC Y FPP CONDITION CODES TO CPU CODES. 
BEQ 101$ “BRANCH TO NEXT TEST IF 
STF ACO,STORE+46 § :STORE ACTUAL ACO FOR ERROR PRINTING. 
MOV #STORE ,RO “MOVE ADDRESS OF EXPECTED ACO TO RO. 
: THE NEXT TWO INSTRUCTIONS TRY TO RESTORE THE ACCUMULATOR AND CHECK THE ACCUMULATOR 
TO MAKE SURE IT WAS RESTORED PROPERLY FOR THE NEXT RUN THROUGH THIS TRAP HANDLER. 
‘IT IS *IMPORTANT* TO REALIZE THAT IF THE ‘‘CMPF'’ FINDS A DIFFERENCE, THAT THE 
*FLOATING*POINT*STATUS* IS BEING CHANGED MISTAKENLY. AN ERROR IN THE MICROCODE 
“HAS BEEN FOUND TO CAUSE THIS, SO CHECK THE REVISION OF THE ROM/PROM SET IN THE 
FPP YOU HAVE. IF YOU DO HAVE WHAT *SEEMS* TO BE THE LATEST REV, A NEW REV WILL 
‘BE COMMING OUT TO CORRECT THIS PROBLEM. THIS SAME 'LDF/CMPF’' SET OF RESTORE/ 
“CHECK INSTRUCTIONS IS ACCOMPLISHED FOR EACH ACCUMULATOR CHECK. IT IS ALSO 
> IMPORTANT TO NOTE THAT IF AN ACCUMULATOR FAILS TO RESTORE PROPERLY, SUBSEQUENT 
“PASSES THROUGH THE TRAP HANDLER WILL SKIP THE ACCUMULATOR CHECKS DUE TO THE 
‘BIT TEST #400 ABOVE. FOR EXAMPLE, IF ACO FAILS TO LOAD PROPERLY, AC1 THROUGH 
[AC3 WILL STILL BE CHECKED. AS SOON AS ANOTHER FPP INSTRUCTION TRAPS IN THE 
[MAIN TEST, ALL *FURTHER® ACO-AC3 CHECKS WILL BE SKIPPED. 
LDF STORE ,ACO ZRESTORE A 
CMPF STORE .ACO [SEE IF IT WAS RESTORED PROPERLY. 
CFCC [COPY FPP CONDITION CODES TO CPU CODES. 
BEQ 7$ ‘BRANCH TO ERROR CALL IF Ok. 
BR 113$ “BRANCH TO ERROR SETUP ROUTINE. 
137416 101$: MOV #1,$1TMP2 ‘PUT A ‘1° IN "AC CHANGED’ LOCATION. 
137416 MOV #102$,$TMP5 “MOVE RETURN TO $TMPS. 
CMPF STORE+10,AC1 [SEE IF AC1 WAS CHANGED 
CFCC [COPY FPP CONDITION CODES TO CPU CODES. 
BEQ 102$ :BRANCH TO NEXT TEST IF 
STF AC1,STORE+46 § :STORE ACTUAL AC1 FOR ERROR PRINTING. 
MOV #STORE+10,RO | :MOVE ADDRESS OF EXPECTED AC1 TO RO. 
LDF STORE+10,AC1 SRESTORE AC1. 
CMPF STORE+10.AC1 [SEE IF IT WAS RESTORED PROPERLY 
CFCC =COPY FPP CONDITION CODES TO CPU CODES. 
BEQ 7$ [BRANCH TO ERROR CALL IF OK. 
BR 113$ “BRANCH TO ERROR SETUP ROUTINE. 
137344 102$: MOV #2, $TMP2 ‘PUT A '2° IN "AC CHANGED’ LOCATION. 
137344 MOV #103$,$TMP5 [MOVE RETURN TO STMPS 
CMPF STORE+20,AC2  :SEE IF AC2 WAS C 
CFCC ‘COPY FPP CONDITION CODES TO CPU CODES. 
BEQ 103$ [BRANCH TO NEXT TEST IF 
STF AC2,STORE+46 § :STORE ACTUAL AC2 FOR ERROR PRINTING. 
MOV #STORE+20,RO | :MOVE ADDRESS OF EXPECTED AC2 TO RO. 
LDF STORE+20,AC2 _:RESTORE AC2. 
CMPF STORE+20.AC2  :SEE IF IT WAS RESTORED PROPERLY 
CFCC [COPY FPP CONDITION CODES TO CPU CODES. 
BEQ 4 ‘BRANCH TO ERROR CALL IF Ok. 
BR 113$ BRANCH TO ERROR SETUP ROUTINE. 
137272 103%: MOV 3,$TMP2 A ‘3° IN "AC CHANGED® LOCATION. 
137272 MOV #1008, $TMP5 :MOVE RETURN TO $TMPS. 
CMPE STORE+30,AC3 _;SEE_IF AC3 WAS CHANGED 
CFCC Y FPP CONDITION CODES TO CPU CODES. 
BEQ 100$ < BRANCH TO NEXT TEST IF Ok. 
STF AC3,STORE+46  :STORE ACTUAL AC3 FOR ERROR PRINTING. 
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SEG 0179 


7442 041766 012700 042452 MOV MSTORE+30,RO | ;MOVE ADDRESS OF EXPECTED AC3 TO RO. 
7443 041772 172767 000454 LDF STORE+30,AC3  :RESTORE AC3. 
7444 041776 173767 000450 CMPF § STORE+30.AC3 =: SEE _IF IT WAS RESTORED PROPERLY. 
7445 042002 170000 CFCC ;COPY FPP CONDITION CODES TO CPU CODES. 
7446 042004 001467 BEQ 7$ CH TO ERROR CALL IF Ok. 
7447 042006 012767 000402 137256 113$: MOV #402, $TMP20 :MOVE 402 TO ERROR POINTER 
7448 042014 63 BR 7$ CH TO ERROR CALL. 
7449 042016 005067 137214 100$: CLR $TMP2 “CLEAR "REGISTER CHANGED’ LOCATION. 
7450 042022 105267 137244 INCB = $TMP.20 [SET ERROR POINTER BYTE. 
7451 042026 012767 042062 137210 MOV #120$,$TMP5 [MOVE RETURN TC $TMPS. 
7452 042034 026700 CMP STORE+40,RO ‘SEE IF RO WAS CHANGED. 
7453 042040 001410 BEQ 120$ ‘BRANCH TO NEXT TEST IF OK. 
7454 042042 010067 137200 MOV RO, $TMP6 ‘MOVE ACTUAL RO TO LOCATION FOR ERROR PRINTING. 
7455 042046 016767 000410 137164 MOV STORE+40,$TMP3 :MOVE EXPECTED TO LOCATION FOR ERROR PRINTING. 
7456 042054 016700 000402 MOV STORE+40.RO TRESTORE RO. 
7457 042060 41 BR 7$ [BRANCH TO ERROR CALL. 
7458 04 012767 137146 1208: MOV #2, $TMP2 “PUT A '2° IN "REGISTER CHANGED’ LOCATION. 
7459 042070 012767 042124 137146 MOV #130$,$TMPS *MOVE RETURN TO $TMPS. 
7460 042076 026702 362 CMP STORE+42,R2 “SEE IF R2 WAS 
7461 042102 001410 BEQ 130$ : CH TO NEXT TEST IF Ok. 
7462 042106 010267 137136 MOV R2,$TMP6 “MOVE ACTUAL R2 TO LOCATION FOR ERROR PRINTING. 
7463 042110 016767 000350 137122 MOV STORE+42,$TMP3 =MOVE EXPECTED TO LOCATION FOR ERROR PRINTING. 
7464 042116 016702 000342 MOV STORE +42.R2 :RESTORE 
7465 062122 BR 7$ CH TO ERROR CALL 
7466 042126 012767 000003 137126 130$: MOV #3, $1MP13 [PUT A 5S IN "REGISTER CHANGED’ LOCATION. 
7467 042132 012767 042356 137104 MOV #8$,$TMP5 [MOVE RETURN TO $TMPS. 
7468 042140 703 000322 CMP STORE +44 ,R3 *SEE IF R3 WAS CHANGED. 
7469 042144 001504 BEQ RS ‘BRANCH TO RETURN IF OK. 
76476 042146 010367 137074 MOV R3,S$TMP6 “MOVE ACTUAL R3 TO LOCATION FOR ERROR PRINTING. 
7471 042152 016767 000310 137060 MOV STORE+44,$1MP3 :MOVE EXPECTED TO LOCATION FOR ERROR PRINTING. 
7472 042160 016703 000302 MOV STORE +44 .R3 “RESTORE R 
7473 042164 105767 137102 7$: TSTB  $TMP20 :TEST TO SEE WHICH ERROR IS BEING PRINTED. 
7474 042170 001027 BNE 72$ ‘BRANCH AROUND ERROR DATA SETUPS IF SR1 OR REG ERROR. 
7475 042172 012067 137042 71$: MOV (RO)+,$TMP3 “MOVE 1ST WORD OF ACTUAL AC DATA TO $TMP3. 
7476 042176 012067 137040 MOV (RO) +, $TMP4 [MOVE 2ND WORD OF ACTUAL AC DATA TO $TMP4. 
7477 042202 012067 137040 MOV (RO)+,$TMP6 [MOVE 3RD WORD OF ACTUAL AC DATA TO STMP6. 
7478 042206 012067 137036 MOV (RO) +, $TMP7 [MOVE 4TH OF ACTUAL AC DATA TO $TMP7. 
7479 042212 016 000262 MOV STORE+56,RO SRESTORE RO TO WHAT IT HAD AT BEGINNING OF TRAP. 
7480 042216 016767 000246 137026 ; MOV STORE+46.$TMP10 :MOVE 1ST WORD OF EXPECTED AC DATA TO $TMP10. 
7481 042226 016767 000242 137022 MOV STORE+50.$1MP11 :MOVE 2ND WORD OF EXPECTED AC DATA TO $TMP11. 
7482 042232 016767 000236 137016 MOV STORE+52.$1MP12 :MOVE 3RD WORD OF EXPECTED AC DATA TO $TMP12. 
7483 042240 016767 000232 137026 MOV STORE+54.$TMP21 :MOVE 4TH WORD OF EXPECTED AC DATA TO $TMP21. 
7484 042246 04 BR 73$ [BRANCH TO ERROR CALL NEST. 
7485 042250 122767 000002 137014 728: CMPB ss #2, STMP20 ‘TEST TO SEE IF AC LOAD ERROR. 

0422 1745 BEQ 71$ [BRANCH TO DATA PREPARE ROUTINE IF SO. 
7487 042260 012667 137002 73$: MOV (SP)+,$TMP16  :SAVE 1ST CONTENTS OF STACK AND POP IT ONCE. 
7488 042264 667 137000 MOV (SP)+-$TMP17 |: SAVE 2ND CONTENTS OF STACK AND POP IT AGAIN. 
7489 042270 122767 2 136774 CMPB so #2, $TMP.20 [TEST TO SEE IF AC LOAD ERROR. 
7490 042276 002 BNE 735$ :BRANCH TO NEXT CHECK IF NOT. 
7491 042300 104370 ERROR +370 AC LOAD ERROR. 
7492 042302 000417 BR 77$ SBRANCH TO STACK RESTORE. 
7493 042304 122767 177776 136760 735%: CMPB ae. $TMP20 [SEE IF MODE 0 ERROR REPORT. 
749% 042312 001002 BNE *BRANCH 10 NEXT TEST IF NOT. 
7495 042314 104365 ERROR +365 :MODE 0 TRAP ERROR. 
76496 042316 000411 77$ ‘BRANCH TO STACK RESTORE. 
7497 042320 105767 136746 74$: TSTB = $TMP20 *TEST ERROR CALL FLAG. 
7498 042324 100002 BPL 75$ “BRANCH TO 2ND b abn IF NOT NEGATIVE. 
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SEQ 0180 


7499 042326 104363 ERROR +363 ;ERROR FOR DIFFERENCE APPEARING BETWEEN SRi & CALC'D. 
7500 042330 000404 BR 77$ ‘BRANCH TO STACK RESTORE. 
7501 042332 003002 75$: BGT 76$ ;BRANCH TO 3RD ERROR IF $TMP20 EQUALS 1 
7502 042334 104366 ERROR +366 ;FPP ACCUMULATOR WAS CHANGED IN ABORT ERROR. 
042336 000401 77$ ‘BRANCH TO STACK RESTORE. 
7504 042340 104367 76$: ERROR +367 ;GENERAL REGISTER WAS CHANGED IN ABORT ERROR. 
7505 042342 016746 136722 77$: MOV $TMP17,-(SP) ‘PUSH H 2ND CONTENTS BACK ON THE STACK. 
75 04234 016746 136714 MOV STMP16,-(SP) :PUSH 1S7 CONTENTS BACK ON THE STACK. 
7507 042352 177 136666 JMP aSTMPS ; JUMP TO CONTINUE CHECKING. 
7508 042356 022776 000004 000000 8%: CMP #4 ,a0(SP) ‘SEE IF INSTRUCTION IS THE IOT. 
7509 042 001403 BEQ 9$ ‘BRANCH IF THE IOT HAS BEEN FOUND. 
7510 042366 062716 000002 ADD #2, (SP) scone ct PC RETURN. 
7511 042372 000771 BR $ CK FOR ANOTHER 
7512 042374 062716 000002 9$: ADD #2, (SP) CORRECT PC RETURN TO POINT YAFTER IOT FOUND. 
7513 042400 005267 135166 INC MMRO > TURN ON MEMORY MANAGEMENT, AND 
ed 042404 RTI RETURN FROM INTERRUPT. 
7516 042406 NODAT: -BLKW 6 LOCATION IN NON-RES. D-SPACE USED TO oy | A TRAP. 
7517 THE "STORE LOCATION BELOW IS PARTITIONED TO RESERVE *4* WORDS FOR EACH 
7518 ;ACCUMULATOR, EVEN THOUGH ONLY 2 ARE REQUIRED FOR STORING A FLOATING MPBER. 
7519 :THIS IS BE CAUSE *]F* THE FPS IS CHANGED BY A PROBLEM IN THE FPP, SO THAT A 
7520 ;*DOUBLE* IS STORED, *4* WORDS RESERVED WILL GUARANTEE THAT THE NEXT DATA BLOCK 
7521 sWILL NOT BE DISTURBED. PARTITIONING IS AS FOLLOWS: 
7522 : WORD (S) SE 
7523 rr 
7524 : 1-4 STORE ACO 
7525 3 5 -10 STORE AC1 
7526 ; 11-14 STORE AC2 
7527 ; 15-20 STORE AC3 
7528 3 21 STORE RO 
7529 é 22 STORE R2 
7530 : 23 STORE R3 
7531 ; 24-27 STORE ACTUAL AC 
7532 s 30 STORE ACTUAL RO SO RO CAN BE USED IN AC ERROR CALLS 
eh, 042422 STORE: BLKW 30 : STORAGE LOCATIONS FOR THE FLOATING ACCUMULATORS & DATA. 
7535 042502 005067 135 ENDTES: CLR MMRO ; TURN OFF MEMORY MANAGEMENT. 
75 042506 016767 136550 135534 MOV $TMP14,.MMVECT sRESTORE MMVECT CONTENTS. 
7537 042514 016767 136544 135276 V $TMP15, IOTRAP ZRESTORE IOTRAP CONTENTS. 
7538 042522 DIDONE : 
0425 104412 RSE TUP :GO INITIALIZE THE FPS AND STACK; AND 
sSEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOF TWARE 
sVIRTUAL CONSOLE SWITCH REGISTER (HAS 
7539 ; THE USER TYPED CONTROL G?). 
7540 042524 TST100: 
7541 
7542 
7543 
7544 -SBTTL END OF PASS ROUTINE 


J PRA ERAEEAEEREE 


; * INCREMENT THE PASS NUMBER (SPA 


: * INDICATE END-OF -PROGRAM + AL 
:*1F SW12=1 INHIBIT TRACE T 

:*IF THERES A MONITOR GO TO vi 
i*IF THERE ISN'T JUMP TO LOOP 


(AR RRARRARASRRSAAARARRR SRS AER AAR SS SS | 


ASS) 
R 1 PASSES THRU THE PROGRAM 
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136554 


136156 


SEOP: 





SEOPCT: .WORD 


MO 
SENDCT: sont 


37658: 
64$: 


s °678: 
66$: 


$GET42: 


$CLR.T: 


SENDAD: 


$DOAGN: 


1$: 
$RTIRN: 
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STSTNM 
$TIMES 


$SPASS 
#100000, $PASS 
“feet 

$DOAGN 
falco 


,65$ 


64$ 
<12><15>/END pass 4/ 


$PASS ,-(SP) 


.67$ 

66$ 

/ TOTAL ERRORS 
SERTTL,-(SP) 
6 

0 

. $CRLF 

SERTTL 
a#42,RO 
$SDOAGN 

-(SP) 
#$CLR.T,-(SP) 
SRTRN 
a#42,RO 
$DOAGN 

PC, (RO) 


#20, (SP) 
#B1T12,aSWR 


1$ 
$TBIT 
1$ 


#20, (SP) 
#$L OOP ,-(SP) 


SEQ 0181 


73ZERO THE TEST NUMBER 

2eZER O THE NUMBER OF ITERATIONS 
; INCREMENT THE PASS NUMBER 

i DON'T ALLOW A NEG. NUMBER 


SsYES 
;sRESTORE COUNTER 


TYPE ASCIZ STRING 
GET OVER THE ASCIZ 


7zSAVE SPASS FOR TYPEOUT 
::TYPE PASS NUMBER IN OCTAL 
3:GO TYPE--OCTAL ASCII 

22 TYPE 6 DIGITS 


GET OVER THE ~ 
SINCE LAST REPORT / 


:-SAVE SERTTL FOR TYPEOUT 
::TOTAL NUMBER OF ERRORS IN OCTAL 
::GO TYPE--OCTAL ASCII 
3:TYPE 6 DIGITS 
:sSUPPRESS LEADING ZEROS 
7: TYPE CARRIAGE RETURN, LINE FEED 
3sCLEAR ERROR TOTAL 
;;GET MONITOR ADDRESS 
;;BRANCH IF NO MONITOR 
7. INSURE THE at's =. ane 
2 SETUP FOR AN RTI OR R 
:GO_DO AN RTI OR RIT tO. LOAD THE PSwW 
S:WITH A CLEARED ‘T'' BIT 


22 INSURE =. CONTAINS THE MONITORS 
RETURN ADDRESS 
: CLEAR THE WORLD 


;;PUSH OLD PSW AND PC ON STACK 
CLEAR THE ‘'T’’ BIT 
3 RUN oo TRACE TRAP? 


:BR IF 
2318 IT TIME FOR TRACE TRAP 
IF NO 


3:SET TRACE TRAP 

3: JUMP TO START OF TEST 

ay A i IS CHANGED TO 
"RIT IF 'RTT IS A LEGAL 


N 14 
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END OF PASS ROUTINE SEQ 0182 
72 INSTRUCTION 

043004 $LOOP: 
043004 000137 JMP a(PC)+ 3 ;RETURN 
043006 006570 SRTNAD: .WORD LOOP 
043010 000000 $TBIT: .WORD 0 :2''T'’ BIT STATE INDICATOR 
043012 377 377 00G S$ENULL: yg -1,-1,0 ZZNULL CHARACTER STRING 

7545 . 

7546 .-SBTTL SCOPE HANDLER ROUTINE 


eee itigtiii it ititiiiiitiiitiiiiitiiiitiiiitiitiiiiritiiiitiiiy) 
3*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
;*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

:*THE SWITCH watt oe teat BY THIS ROUTINE ARE: 


+ *SW14=1 
+ *SW11=1 INHIBIT ITERATIONS 
> *SWO9=1 LOOP ON ERROR 
+ *SWO8=1 LOOP ON TEST IN SWR<7:0> 
7 *CALL 
:* SCOPE 2: SCOPE=I0T 
043016 $SCOPE: 
043016 104406 CKSWR z:TEST FOR CHANGE IN SOFT-SwR 
043020 032777 040000 136112 1$: BIT #B1T14,aSWR ;:LOOP ON PRESENT TEST? 
043026 001114 BNE SOVER “YES IF SW14=1 
:MAAHASTART OF CODE FOR THE XOR TESTERMAMKA 
043030 000416 $xTSTR: BR 6$ 31F RUNNING ON THE “SXOR'* TESTER CHANGE 
<I THIS INSTRUCTION TO A ‘NOP’' (NOP=240) 
043032 013746 000004 MOV @#ERRVEC,-(SP) ;:SAVE THE CONTENTS OF Awe ERROR VECTOR 
043036 012737 043056 000004 MOV #5$,aM#ERRVEC ::SET FOR TIMEOUT 
043044 005737 177060 TST a#177060 +: TIME OUT ON XOR? 
043050 012637 000004 MOV (SP)+,@WERRVEC ;;RESTORE THE ERROR VECTOR 
043054 000463 BR $SVLAD : TO THE NEXT TEST 
043056 022626 5$: CMP (SP)+, (SP)+ [CLEAR THE STACK AFTER A TIME OUT 
043060 012637 000004 MOV (SP) +, A#ERRVEC 3 SRESTORE THE ERROR VECTOR 
043064 000423 BR 7$ LOOP ON THE PRESENT TEST 
043066 6$::MHHMAEND OF CODE FOR THE XOR’ TESTERAMMAH 
032777 000400 136044 BIT #B1TO8, aSWR ::LOOP ON SPEC. TEST? 
043074 001404 BEQ 2 [BR IF NO 
043076 127767 136036 135776 CMPB  aSWR,STSTNM SION THE RIGHT TEST? SWR<7:0> 
043104 001465 BEQ SOVER ::BR IF YES 
043106 105767 135771 2$: TSTB  $ERFLG ::HAS AN ERROR OCCURRED? 
043112 001421 BEQ 3$ ::BR IF NO 
043114 126767 135775 135761 CMPB  $ERMAX,SERFLG ::MAX. ERRORS FOR THIS TEST OCCURRED? 
043122 101015 BHI ::BR IF NO 
043124 032777 001000 136006 BIT #BITO9, aSwR *:LOOP ON ERROR? 
043132 001404 BEQ 4 ::BR IF NO 
043134 016767 135750 135744 7$: MOV SLPERR,SLPADR ::SET LOOP ADDRESS TO LAST SCOPE 
043142 000446 BR SOVER 
043144 105067 135733 4$: CLRB = $ERFLG ::ZERO THE ERROR FLAG 
043150 005067 136126 CLR STIMES [CLEAR “ME NUMBER OF ITERATIONS TO MAKE 
043154 000415 1$ SZESCAPE TO THE NEXT TEST 
043156 032777 004000 135754 3$: BIT #B1T11,aSwR ;: INHIBIT ITERATIONS? 
043164 001011 BNE 1$ ::BR IF YES 
043166 005767 136132 TST $PASS iz 1F FIRST PASS OF PROGRAM 
043172 001406 BEQ 1$ INHIBIT ITERATIONS 
043174 005267 135704 INC $ICNT : INCREMENT ITERATION COUNT 
043200 026767 136076 135676 CMP STIMES,SICNT *ZCHECK THE NUMBER OF ITERATIONS MADE 
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MACRO M1111 
SEQ 0183 
BGE ;;BR IF MORE ITERATION REQUIRED 
135666 18: MOV #1,S1CNT {:REINITIALIZE THE ITERATION COUNTER 
136056 MOV SMXCNT,STIMES  ;;SET NUMBER OF ITERATIONS TO DO 
$SVLAD: INCB = $TSTNM :COUNT TEST NUMBERS 
136064 MOVB = $TSTNM, STESTN ::eT TEST NUMBER. IN APT MAILBOX 
MOV (SP) ,$LPADR ;SAVE SCOPE LOOP ADDRESS 
MOV (SP) , SLPERR 7 7SAVE ERROR LOOP ADDRESS 
CLR SE SCAPE i: CLEAR THE ESCAPE FROM ERROR ADDRESS 
135635 MOVB #1, SERMAX Y ALLOW ONE(1) ERROR ON NEXT TES 
135654 $OVER: MOV STSTNM, @DISPLAY ; :DISPLAY TEST NUMBER 
MOV SLPADR, (SP) FUDGE RETURN ADDRESS 
RTI ZiF KES PS 
SMXCNT: 1 . NUMBER OF ITERATIONS 
.SBTTL ERROR HANDLER ROUTINE 
JAAR RARAEEAEAAREAEEREREEREREREERERRERERERRERRREREERRERHAERHEREER 
*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
:*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL 
:*AND GO TO ERTYPE ON ERROR 
*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
:*Sw15= HALT ON ERR 
> *SW13=1 INHIBIT ERROR TYPEOUTS 
> *SW10=1 BELL ON ERROR 
: #W09=1 LOOP ON ERROR 
* 
RROR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 
$ERROR 
CKSWR :zTEST FOR CHANGE IN SOFT-SWR 
7$ INCB —- SERFLG T THE ERROR FLAG 
BEO 7$ :DON'T LET THE FLAG GO TO ZERO 
135626 MOV STSTNM,@DISPLAY ::DISPLAY TEST NUMBER AND ERROR FLAG 
135616 BIT #81110. aSwR BELL ON ERROR? 
BEQ $ INO ~ SKIP 
TYPE ,$BEL 7 7RING BELL 
1$ INC $ERTTL [COUNT THE NUMBER OF ERRORS 
MOV (SP) , SERRPC ZIGET ADDRESS OF ERROR INSTRUCTION 
135550 SUB #2, SERRPC 
135540 MOVB  @SERRPC,SITEMB ;;STRIP AND SAVE THE ERROR ITEM CODE 
135556 BIT #81113, aSWR SISKIP TYPEOUT IF SET 
BNE 20 SKIP TYPEOUTS 
JSR PC ,ERTYPE ::GO TO USER ERROR ROUTINE 
oe TYPE —_, CRLF 
135734 CMPB = WAPTENV,SENV =; RUNNING IN APT MODE 
BNE :iNO,SKIP APT ERROR REPORT 
000004 MOVE — SITEMB. 218 Tf ITEM NUMBER AS ERROR NUMBER 
JSR PC, SATY :IREPORT FATAL ERROR TO APT 
21$: BYTE 0 
22$: BR 22$ ; APT ERROR LOOP 
2$: TST aSWR :: ON ERROR 
BPL 3$ SESKIP IF CONTINUE 
HALT 3: ERROR ! 
CKSWR ::TEST FOR CHANGE IN SOFT-SWR 
135476 38: BIT #81109, aSwR [LOOP ON ERROR SWITCH SET? 
BEQ BR IF NO 
MOV SLPERR, (SP; FUDGE RETURN FOR LOOPING 


C 
CKFPCAC FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 29-15 
ERROR HANDLER ROUTINE SEQ 0184 
043450 005767 135630 4$: TST $SESCAPE og FOR AN ESCAPE ADDRESS 
043454 001402 BEQ 5$ :BR_IF NONE 


04 3456 016716 135622 - MOV SESCAPE, (SP) tZFUDGE RETURN ADDRESS FOR ESCAPE 
043462 022737 042736 000042 CMP WSENDAD,@#42 =; :ACT=11 AUTO-ACCEPT? 
043470 001001 BNE 6$ BRANCH IF NO 
043472 000000 HALT ZYES 
043474 6$: 
74 032777 001000 135436 BIT #B1T09,aSwR 
043502 001013 BNE ERM10 
043504 011637 001162 MOV (SP) , a#$REGO :SEE IF ERROR #377 
043510 062737 177776 001162 ADD #=-2, @#SREGO 
043516 122777 000377 135436 CMPB ss #’377 , aSREGO 
043524 001002 BNE ERM10 
043526 062716 000002 ADD #2, (SP) 
sees 043532 000002 ERM10: RTI 
7550 .SBTTL SAVE AND RESTORE RO-RS ROUTINES 
5 FAA RARER AEREEEEEAREEERERRERREREEREREREEREREERRE EERE EH 
:*SAVE RO=R5 
3*CALL: 
ie SAVREG 
:*UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 
‘ eTOP=--(+16) 
y* +2---(+18) 
pe +4---R5 
st +6=—=AG 
3% +8---R3 
3*+10---R2 
pet12---R1 
+ 414---R0 
043534 $SAVREG: | 
043534 010046 MOV RO,-(SP) ::PUSH RO ON STACK 
043536 010146 MOV R1,-(SP) ;;PUSH R1 ON STACK 
043540 010246 MOV R2,-(SP) SZPUSH R2 ON STACK 
043542 010346 MOV R3,-(SP) + PUSH R3 ON STACK 
043544 0104 MOV R4.-(SP) +=PUSH R4 ON STACK 
043546 010546 MOV R5.-(SP) +:PUSH RS ON STACK 
043550 016646 000022 MOV 22(SP) ,-(SP) *>SAVE PS OF MAIN FLOW 
043554 016646 000022 MOV 22 (SP) ,-(SP) 7 SAVE PC OF MAIN FLOW 
3560 016646 000022 MOV 22(SP) .=(SP) += SAVE PS OF CALL 
3564 016646 000022 MOV 22(SP) .-(SP) >:SAVE PC OF CALL 
043570 000002 RTI 
:*RESTORE RO-RS5 
Z*CALL: 
:* RESREG 
043572 $RESREG: 
043572 012666 000022 MOV (SP) +,22(SP) ::RESTORE PC OF CALL 
043576 012666 000022 MOV (SP) +,22(SP) *SRESTORE PS OF CALL 
043602 012666 000022 MOV (SP) +,22(SP) s:RESTORE PC OF MAIN FLOW 
043606 012666 000022 MOV (SP)+,22(SP) ;ZRESTORE PS OF MAIN FLOW 
043612 012605 MOV (SP)+.R5 *POP STACK INTO R5 
043614 012604 MOV (SP) +,R4 +: POP STACK INTO R4 
043616 012603 MOV (SP) +.R3 +:POP STACK INTO R3 
043620 012602 MOV (SP) +.R2 ::POP STACK INTO R2 
043622 012601 MOV (SP)+,R1 ::POP STACK INTO R1 





CKFPCAO FP11F FLTG PNT PRT C 


SAVE AND RESTORE RO=R5 ROUTINES 


7551 
7552 


043624 
043626 


012600 
000002 


105767 
100002 
000000 


016746 
105366 
002770 
004767 
105367 


135323 


000002 
000001 


000100 


000004 
000516 
000040 


000002 
000611 
000200 


000200 


000056 
135166 


135156 
000001 


000032 
000142 


MACRO M1111 


135460 
135451 


135427 


D1 
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MOV 
RTI 


(SP)+,RO 


» SBTTL TYPE ROUTINE 


RRRAAEAAEARARAAAEAKEAARARARARAERARAARARAAERAEARAAARAAREAEAERARERRERERKEEKE 


;*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 git 


:*THE ROUT INE WILL INSERT A NUMBER 
SNULL 


3 *NOTE1 
i *NOTE2: 
: sNOTES: 


; “CAL 
:*1) “USING. A TRAP INSTRUCTION 


61$: 
62%: 


2$: 
60$: 
3$: 

4$: 


5$: 
6$: 


7$: 


SEQ 0185 


;sPOP STACK INTC RO 


HARACTERS AFTER A LINE 


OF NULL FEED. 
CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


»ME SADR 


STPFLG 
1$ 


3$ 

RO,-(SP) 
@2(SP) ,RO 
#APTENV, SENV 


M#APTSPOOL , SENVM 
62$ 


RO,61$ 
PC, SATY3 


MAPTCSUP , SENVM 
60$ 


(RO) +,-(SP) 
4$ 

(SP) + 

(SP) +,RO 
AHT, (SP) 

8$ 
ACRLF , (SP) 
5$ 


(SP) + 


_ 


2 
PC, STYPEC 
SFILLC,(SP)+ 


$NULL ,~ (SP) 
1(SP) 
6$ 


PC,$TYPEC 
SCHARCNT 


3zMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


iT He Be TERMINAL ? 
;sHALT HERE IF NO TERMINAL 
AVE 


:SAVE RO 
ZIGET ADDRESS  -. ASCIZ STRING 
7 RUNNING IN APT MODE 
:2NO,GO CHECK FOR APT CONSOLE 
+s SPOOL MESSAGE TO APT 

:NO,GO CHECK FOR CONSOLE 
i3SE TUP MESSAGE ar FOR APT 


ON. 
77YES,SKIP TYPE 
: PUSH CHARACTER TO BE TYPED ONTO STACK 
; IT ISN'T THE TERMINATOR 
OR POP IT OFF THE STACK 


0 
“ADJUST RETURN PC 
SURET URN 
7; BRANCH IF <HT> 


; ;BRANCH IF NOT <CRLF> 


:POP_ <CR><LF> + rahe 
TYPE A CR AND L 


+7 CLEAR CHARACTER aed 


3:18 IT TIME FOR co . CHARS .? 
iilF NO GO GET NEXT C 
p34 # OF fog: CHARS. “NEEDED 
THE NULL C 
S_A NULL NEED TO BE TYPED? 
IF NO--GO POP THE NULL OFF OF STACK 


A NULL 
:;D0O NOT COUNT AS A COUNT 





CKFPCAO 
TYPE ROU 


7553 
7554 


gad FLTG PNT 
ROUT INE 


044014 000770 
044016 112716 
004767 


044162 017646 


PRT ( 


000040 
000014 
000007 


135102 


000002 
135062 


135056 
177600 
000023 
135036 
135032 
177600 
000021 
000015 
000014 


000012 


000000 
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000122 


135074 


000002 


000002 


HORIZONTAL TAB aes > 


L $TYPEC 
MOVB  2(SP),a$TPB ;LOAD CHAR TO BE TYPED INTO DATA REG. 
TSTB  ~— @$TKS <°SEE IF KEYBOARD IS TALKING. 
BPL 2$ : BRANCH IF IT | 
MOV @$TKB,-(SP) +=PUSH CHARACTER ONTO STACK 
BIC m1 77600, (SP) ::BIT CLEAR TOP ByTE AND PARITY BIT. 
CMP #23, ( ::SEE IF THIS IS A “S. 
BNE 2$ + =BRANCH TO CONTINUE IF IT ISN'T. 
3$: TSTB = @STKS +:WAIT FOR ANOTHER INPUT. 
BPL 3$ *ZBRANCH BACK IF NOT READY. 
MOV @$TKB,-(SP) +:PUSH NEXT CHARACTER ON STACK. 
BIC #177600, (SP) :2B1T CLEAR TOP BYTE AND PARITY BIT. 
CMP #21, (SP)+ [SEE IF THIS IS A *Q. 
BNE 3$ BRANCH BACK FOR MORE WAIT IF NOT. 
2$: CMPB ss CR, 2( SP) HHS CHARACTER A CARRIAGE RETURN? 
BNE 1$ CH IF NO 
CLRB = $CHARCNT :EYES=“CLEAR CHARACTER COUNT 
BR $TYPEX + ZEXIT 
1$: CMPB ss #LF, 2( SP) *:]S CHARACTER A LINE FEED? 
BEQ $TYPEX + =BRANCH IF YES 
INCB = (PC) + >: COUNT THE CHARACTER 
SCHARCNT:.WORD 0 +> CHARACTER COUNT STORAGE 
$TYPEX: RTS PC 


.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 

LT AAA AAA REEEREEREEREREEEKEEEEKEEEKEEREREEEKHEEEH 

:*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
:*OCTAL (ASCII) NUMBER AND TYPE IT. 

is STYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
*& 


i* MOV NUM , - (SP) : ;NUMBER TO BE TYPED 

i* TYPOS 77CALL FOR TYPEOUT 

;* -BYTE N zzN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
3* -BYTE ™M 7 7M=1 OR O 

ps 321=TYPE LEADING ZEROS 

:* 7 0=SUPPRESS LEADING ZEROS 

** 


> *$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
:*$TYPOS OR $TYPOC 


®CALL: 
ie MOV NUM, = (SP) : NUMBER TO BE TYPED 
ie TYPON *=CALL FOR TYPEOUT 

;s$1YPOC—--ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
ie MOV NUM, = (SP) :;NUMBER TO BE TYPED 


.* TYPOC :CALL FOR TYPEOUT 
$TYPOS: MOV @(SP) ,-(SP) ‘PICKUP THE MODE 


E17 
; ; SEQ 0186 
BR 7$ szh0OP 
8s: MOVB , (SP) : :REPLACE TAB WITH SPACE 
9$: JSR BC, $TYPEC ‘TYPE A SPACE 
BITB #7.$CHARCNT ; BRANCH IF NOT AT 
BNE 9S" ‘TAB STOP 
TST (SP) + ::POP SPACE OFF STACK 
BR 2$ +:GET NEXT CHARACTER 
$TYPEC: Ise a$IPs + :WAIT UNTIL PRINTER IS READY 


CKFPCAO FP11F FLTG PNT PRT C 


BINARY TO OCTAL 


7555 
7556 


(ASCII) AND TYPE 


116667 000001 
112667 000207 
obese 000002 
767 000001 


000006 
767 000005 


006103 
105367 000076 
042703 177770 


000002 


67 000001 
$4 000001 


F 1 
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000211 MOVB 


BR 
000171 $TYPOC: MOVB 
000165 MOVB 
000154 $TYPON: MOVB 


1$: ROL 
BR 
2$: ROL 


3$: ROL 


4$: INC 
5$: BIS 


7$: DECB 


6$: MOV 
000004 MOV 


8$: BYTE 
SOCNT: “BYTE 


SOFILL: .BYTE 
SOMODE: .WORD 


1(SP),SOF ILL 
(SP) +, $OMODE +1 
#2,(SP) 


R4 , SOMODE 
SOF ILL.R4 
12(SP) ,R5 


(SP) +, (SP) 


0 
0 
0 
0 
0 


+ sLOAD ZERO FILL SWITCH 
; ;<NUMBER OF DIGITS TO TYPE 
S:ADJUST RETURN ADDRESS 


SET FOR $1X(6) DIGIT 
$3 ITERATION COUNT 


; 5 
3;3GET THE NUMBER OF DIGITS TO TYPE 


7; SUBTRACT IT FOR MAX. ALLOWED 

;; SAVE IT FOR USE 

77GET THE ZERO FILL SWITCH 

+ PICKUP THE INPUT NUMBER 
;CLEAR THE OUTPUT WORD 

10 00 — INTO *‘C’’ 


ee 0 
FORM THIS DIGIT 


3:GET LSB OF THIS DIGIT 
22 TYPE THIS DIGIT? 


:BR_IF NO 
:3GET RID OF JUNK 
7: TEST FOR 0 


; SUPPRESS THIS 0? 
2 BR IF YES 

DON'T SUPPRESS ANYMORE 0'S 
7ZMAKE THIS DIGIT ASCII 
3 =MAKE oes IF NOT ALREADY 
33SAVE FOR TYPING 
3:GO TYPE THIS DIGIT 

;;COUNT BY 1 
:7BR IF MORE TO DO 


BR _IF DONE 
>: INSURE LAST DIGIT ISN'T A BLANK 
+260 DO THE LAST DIGIT 
RESTORE R5 
TIRESTORE R4 
7 RESTORE R3 
33SET THE STACK FOR RETURNING 


7 RETURN 

7 STORAGE FOR ASCII DIGIT 

2s TERMINATOR FOR TYPE ROUTINE 
sOCTAL DIGIT spestes 

S:ZERO FILL SWITC 

3; NUMBER OF DIGITS TO TYPE 


-SBTTL APT COMMUNICATIONS ROUTINE 


'WEhAAAASARAAAAASZLELASSRER RE RAR ESE RRR RRR RR RRR RR RRR SER RRR RRR RRR RE SE 


000236 $ATY1: MOVB 
000226 $ATY3: MOV 


#1,$FFLG 
#1, SMFLG 
$ATYC 


3zT0O REPORT FATAL ERROR 
7770 TYPE A MESSAGE 


SEQ 0187 



























112767 









7557 
7558 
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APT COMMUNICATIONS ROUTINE 


000001 


000206 
000001 
000100 


000002 
134612 
134620 


134610 
134604 
000004 


000004 
000002 
133216 
177044 
000062 
134536 
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134662 
134653 


000004 


28: 


134560 
000016 3$: 
000004 

4$: 
5$: 
10$: 


11$: 


134502 
000004 


12$: 


SMFLG: 
$LFLG: 
SFFLG: 


MOVB 


APTCSUP=040 
TTY INPUT ROUTINE 


- SBTTL 


LLU RE EERE EERE REE REE EEE ERR Ee 


-ENABL LSB 


SL AAARAAAAAAAAAATRAREERAREEERAERAEAAAAEREAARAANEHRRAEEH KERR eee RES 


‘*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 


#1, $FFLG 
RO,-(SP) 
R1,-(SP) 
SMF LG 


5$ 
MAPTENV, SENV 
3$ 


 Seitiennagnaiens, 


a4 (SP) RO 
#2,4(SP) 
SMSCTYPE 

1$ 

RO, S4SGAD 
(RO) + 

2$ 

SMSGAD ,RO 
RO 

RO, SMSGLGT 
#4, SMSGT YPE 
a4 (SP) ,4$ 
#2,4(SP) 
177776, =(SP) 
PC, $TYPE 

0 

SFFLG 

12$ 

SENV 

12$ 
$MSGTYPE 
11$ 
04 (SP) ZSFATAL 
42,4 


(SP)+,R1 
(SP) +,RO 


; G1 
24=SEP=79 15:03 PAGE 29-19 
SEQ 0188 


000220 $ATY4: 
SATYC: 


33TO ONLY REPORT FATAL ERROR 


3=PUSH RO ON STACK 
;;PUSH R1 ON STACK 
+ ¢ SHOULD - TYPE A MESSAGE? 


NOT: 
; JOPERAT ING UNDER APT? 
:1F NOT: BR 
:: SHOULD SPOOL MESSAGES? 


IF BR 
ZiGET MESSAGE ADDR. 
; ;BUMP RETURN ADDF. 
2éSEE IF DONE W/ LAST XMISSION? 
:1F NOT: WAIT 
::PUT ADDR IN MAILBOX 
72:FIND END OF MESSAGE 


;;SUB START OF MESSAGE 

72GET MESSAGE LNGTH IN WORDS 
;7PUT LENGTH IN MAILBOX 

7: TELL APT TO TAKE MSG. 


:zPUT MSG ADDR IN JSR LINKAGE 
“BUMP RETURN ADDRESS 

PUSH 199776 ON STACK 

‘CALL TYPE MACRO 


¢ ¢ SHOULD» REPORT FATAL ERROR? 
4 4 NOT: BR 
: RUNNING UNDER APT? 
:IF NOT: BR 
:iF INISHED LAST MESSAGE? 
NOT: WAIT 


i IF 
GET ERROR a 
;BUMP RETURN ADDR. 

se TRL net TO TAKE ERROR 
ott an FATAL FLAG 

:CLEAR LOG FLAG 

CLEAR MESSAGE FLAG 

;POP STACK INTO R1 
oo STACK INTO RO 


ZcFATAL FLAG 














































MAMMA AW 
WW a= 
EYSRSSRNVSR 
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TTY INPUT ROUTINE 


022767 






000176 
134252 
134246 
177600 
000007 


134216 


133240 
045303 


134170 
134164 
177600 
000025 
045260 
000006 
000015 
000004 
000002 
000006 
001313 
134071 
000100 
176756 
000060 


000067 


000060 
000002 


000002 
177776 
001312 
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134254 


000001 


134110 


000001 
134066 
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:*ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 


:*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
:*WHEN OPERATING IN TTY FLAG MODE. 
CMP ASWREG, 


$CKSWR: SWR 
BNE i 
TSTB = @STKS 
BPL 15$ 
MOVB  a@$TKS,-(SP) 
BIC #*C177, (SP) 
CMP #7, (SP)+ 
BNE 15$ 
CMPB —«- $AUTOB, 41 
BEQ 15$ 
TYPE /SCNTLG 
$GTSWR: TYPE SMSWR 
V SWREG, - (SP) 
TYPOC 
TYPE , SMNEW 
19$: CLR =(SP) 
CLR -(SP) 
7$: TSTR = a$TKS 
BPL 7$ 
MOVB  a$TKB,-(SP) 
BIC #°(177, (SP) 
9$: CMP (SP) #25 
BNE 10$ 
TYPE SSCNTLU 
20$: ADD , 
BR 19$ 
10$: CMP (SP) #15 
BNE 16$ 
TST 4 (SP) 
BEQ 11$ 
MOV 2(SP) ,aSwR 
i1$: ADD oP 
14$: TYPE .SCRLF 
CMPB ~—s- $INTAG,, #1 
BNE 1 
MOV #100, a$TKS 
15$: RTI 
16$: JSR PC, $TYPEC 
CMP (SP) ,#69 
BLT 1 
CMP (SP) #67 
BGT 18$ 
BIC #60, (SP)+ 
TST 2 (SP) 
BEQ 17$ 
ASL (SP) 
ASL (SP) 
ASL (SP) 
17$: INC 2(SP) 
BiS -2(SP), (SP) 
BR 7$ 
18$: TYPE $QUES 
BR 30$ 
.DSABL LSB 


:iTS THE SOFT=-SWR SELECTED? 
IF NO 


4g THERE ? 
3 , DON'T WAIT AROUND 
CHAR 


seee iT & THE ASCII 
. IT A CONTROL G? 
: NO . RETURN TO USER 
WE RUNNING IN AUTO=MODE ? 

[BRANCH IF YES 

ECHO THE CONTROL-G (*G) 

: TYPE CURRENT CONTENTS 

[SAVE SWREG FOR TYPEOUT 
:60 TYPE=-OCTAL ASCII(ALL DIGITS) 

PROMPT FOR NEW SWR 

[CLEAR COUNTER 


ic IF NOT TRY. AGAIN 

7zPICK UP CHAR 

sMAKE IT 7-BIT ASCII 

IS IT A CONTROL-U? 
;BRANCH IF NOT 

ZYES, ECHO CONTROL-U (“*U) 
; IGNORE PREVIOUS INPUT 
ZLET'S TRY IT AGAIN 

:IS IT A <CR>? 

“BRANCH IF NO 

Ves. ae hin FIRST CHAR? 


Be Be Be Be Be 


ar 
> 
oa 
i 
nn” 
4 F 
oO 

x 


LF> 
nt KBD INTERRUPTS? 
TTY KBD INTERRUPTS 


F YES 


; YES 
ze : STRIP=OF F ASCII 
i1S THIS THE FIRST CHAR 
; BRANCH IF YES 
:iNO, SHIFT PRESENT 
ie CHAR oer TO MAKE 
ROOM FOR NEW ONE. 
;KEEP COUNT OF CHAR 
SET IN NEW CHAR 
:GET THE NEXT ONE 
SO TYPE 2<CR><LF> 
7: SIMULATE CONTROL =U 


Bosess 
> © 
tIv=z 
— Ie 
wn ny 
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TTY INPUT ROUTINE 


7559 
7560 


PRT C 


000004 
133770 


133764 
177600 
000004 


133736 


000002 


045350 


000004 


+ 2h See hage S f 


I 1 
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SEQ 0190 
SF FRIAR RRA REAR KEER EERE RAE ERE ERERRARERRERERE RARE EHS 
is THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
Z*CALL: 
te RDCHR :: INPUT A SINGLE CHARACTER FROM THE TTY 
te RETURN HERE 1: CHARACTER IS ON THE STACK 
te :WITH PARITY BIT STRIPPED OFF 
$RDCHR: MOV (SP) ,=(SP) :PUSH DOWN THE PC 
000002 MOV 4(SP),2(SP) : SAVE THE PS 
1$: TSTB ask KS WALT FOR 
BPL 1$ A CHARACTER 
000004 MOVB  a$TKB,4(SP) S=READ THE TTY 
000004 BIC axel te> 4(SP) GET RID OF JUNK IF ANY 
000023 CMP 4(SP) #23 ::I1S iT A CONTROL-S? 
BNE 3$ + BRANCH IF NO 
2$: TSTB. = @$TKS * WAIT FOR A CHARACTER 
BPL 2$ +:LOOP UNTIL ITS THERE 
MOVB  a$TKR,-(SP) :GET CHARACTER 
BIC #°(177, (SP) [MAKE IT 7-BIT ASCII 
CMP (SP)+,421 ::1S IT A CONTROL-Q? 
BNE 2$ ::1F NOT DISCARD IT 
BR 1$ i: YES, RESUME 
000140 3$: CMP 4 (SP) 4140 SIS IT UPPER CASE? 
BLT 4$ : :BRANCH IF YES 
000175 CMP 4(SP) 4175 StS IT A SPECIAL CHAR? 
BGT 4$ ‘UBRANCH IF YES 
600004 BIC #60,4(SP) : MAKE IT UPPER CASE 
4$: RTI :GO BACK TO USER 
015 $CNTLU: .ASCIZ /4*U/<15><12> =CONTROL ‘U"’ 


015 $CNTLG: .ASCIZ /*G/<15><12> :z CONTROL ‘'G’’ 
123 $MSWR: .ASCIZ <15><12>/SWR = 


040 
000 
116 $MNEW: .ASCIZ / NEW = / 
040 
000 
.SBTTL TRAP DECODER 
'MAAAASAAAAAARAASLALALASESES ASSESSES ESE SAREE RRR SER ESR S RRR SSSR RR RSS SS 
[*THIS ROUTINE WILI. PICKUP THE LOWER BYTE OF THE ‘‘TRAP’' INSTRUCTION 
[*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
>*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
"G0 TO THAT ROUTINE 
$TR MOV RO,-(SP) SAVE RO 
MOV 2(5P) ,RO ey TRAP ADDRESS 
TST ~(RO) : ;BACKUP BY 2 
MOVB (RO) ,RO ::GET RIGHT BYTE OF TRAP 
ASL RO [POSITION FOR INDEXING 
MOV $TRPAD (RO) .RO : INDEX TO TABLE 
RTS RO TO ROUTINE 
giTHIS 1S USE TO HANDLE THE geTPRT" MACRO 
$TRAP2: MOV (SP) ,=(SP) :MOVE THE PC DOWN 
000002 MOV 4 (SP) ,2(SP) TIMOVE THE PSw DOWN 
T -  SERESTORE THE PSW 


RT] 
-SBTTL TRAP TABLE 
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TRAP TABLE 


7561 


RRRRRRRRER 


045374 


7562 045376 
75 


res 
NO 


550 


Oe eee 


012737 


045556 
000340 


133504 


000020 
175234 


MACRO M1111 


s*THIS TABLE Sa a THE rapeeslanes ADDRESSES OF 
:*BY THE saat ie INSTRUCTION 


$TRPAD: 


$TERM= 
- SBTTL 


J1 
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. WORD 
$TY 


-LPER 
. ~$TRPAD 


THE ROUTINES CALLED 


SEQ 0191 


$STRAP2 

3s CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 

3 = CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
;sCALL=TYPOS TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 

; -CALL=TYPON TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
:-CALL=GTSWR TRAP+5(104405) GET SOFT-SWR SETTING 

:-CALL=CKSWR TRAP+6(104406) TEST FOR CHANGE IN SOF T-SWR 

; ;CALL=RDCHR TRAP+7(104407) TTY TYPEIN CHARACTER ROUTINE 


3¢ CALL=SAVREG 
37; CALL=RESREG 
7: CALL=RSETUP 
3; CALL=LPERR 


TRAP+11(104411) RESTORE RO-R5 R 


POWER DOWN AND UP ROUTINES 


—MmASAAAAAAASAAASLALASZALALASAALASSALESASRARARRSR EAS ARRAS RASA RSA SSDS DS BS 


POWER DOWN ROUTINE 


000024 $PWRDN: MOV MSILLUP,@APWRVEC ;;SET FOR FAST UP 
000026 MOV #340, @PWRVEC +2 :2PRIO:7 
MOV RO,-(SP) :zPUSH RO ON STACK 
MOV R1,-(SP) :zPUSH R1 ON STACK 
MOV R2,-(SP) ss H R2 ON STACK 
MCY R3,-(SP) 2.3 H R3 ON STACK 
MOV R4,-(SP) 7zPUSH R4 ON STACK 
MOV R5,-(SP) 7 zPUSH R5 ON STACK 
MOV @SWR ,- (SP) 7ZzPUSH @SWR ON STACK 
MOV SP, $SAVR6 Zz SAVE SP 
000024 moe ASPWRUP ,@APWRVEC ;;:SET UP VECTOR 
L 
BR 72 : HANG UP 
MOABABBASAAALASZASLALASLALASZESSLASE SESS SESE RES ERR SAR RRS RRR R RRR RRS RASS OS 
“ POWER UP ROUTINE 
000024 $PWRUP : MOV #$ILLUP, AAPWRVEC aiaet FOR FAST DOWN 
MOV SSAVR6, Sp 2iGET SP 
CLR SSAVR6 z;WAIT LOOP FOR THE TTY 
1$: INC SSAVR6 WAIT FOR THE INC 
BNE 1$ ig WORD 
MOV (SP) +, a@SWR 7zPOP STACK INTO @SWR 
MCV (SP)+,R5 :zPOP STACK INTO R 
MOV (SP)+,R4 7zPOP STACK INTO R4& 
MOV (SP)+,R3 7 POP STACK INTO R3 
MOV (SP)+,R2 ::POP STACK INTO R2 
MOV (SP)+,R1 2 POP STACK INTC R1 
MOV (SP)+,RO :POP STACK INTO RO 
000024 MOV ASPWRDN, @APWRVEC” + :SET UP THE POWER DOWN VECTOR 
000026 MOV #340, A#PWRVEC +2 ery + ¥ 
? TYPE PORT THE POWER FAILURE 
$SPWRMG: .WORD POWERM +S POWER FAIL MESSAGE POINTER 
MOV (PC) +, (SP) * RESTART AT START 
$PWRAD: .WORD START ; RESTART ADDRESS 
000002 BIC #20,2(SP) 7 CLEAR ‘'T'’ BI 
CLR $TRIT 7: CLEAR THE ‘‘'T’’ BIT FLAG 


TRAP+10(104410) SAVE RO=-R5 eg Oy 


TINE 
TRAP+12(104412) ROUTINE TO INITIALIZE AT END OF EACH TEST 
TRAP+13(104413) ROUTINE TO SET UP LOOP ON ERROR ADDRESS 


K 1 
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POWER DOWN 


AND UP ROUTINES SEQ 0192 

045556 000000 SILLUP: HALT 3-THE POWER UP SEQUENCE WAS STARTED 
045560 000776 BR oe 3: BEFORE THE POWER DOWN WAS COMPLETE 
045562 000000 $SAvRA: 0 3zPUT THE SP HERE 

7566 

7567 

7568 .SBTTL ERROR TYPE OUT ROUTINE 

7569 LER AREER EERE EEE RE EERE EERE EER EERE 

PERERA AREER AREER EERE EEA EERE EER REA AR CEE RARRRee 

7570 ;*THIS ROUTINE IS CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 

7571 :*IN THE ERROR MESSAGE DATA TABLE. IT IS CALLED BY THE $SERROR ROUTINE 

7572 ;*OR BY FIRST SETTING A EQUAL TO THE ERROR TABLE ITEM TO BE PRINTED 

7573 ;*OUT AND THEN ECECUTING 

ete es JSR PC »ERTYPE 

7576 0465564 104401 ERTYPE : TYPE TYPE A CRLF 

7577 045566 001313 -WORD $CRLF 

7578 045570 113737 001102 001232 MOVB a4STSTNM , a#$TMPO 

7579 045576 04 177400 001232 BIC #177400, a4STMPO 

7580 045604 013737 001116 001234 MOV @ASERRPC ,a#$STMP 1 :GET PC OF CALL 

Led 045612 010046 MOV RO,~(SP) ; SAVE RO 

7583 045614 113700 001114 MOVB a4$1TEMB RO :GET THE ITEM NUMBER. 

7584 045620 042700 177400 BIC #177400,R0 

cee 045624 001005 BNE 1$ 

7587 045626 013746 001116 MOV @ASERAPC ,-(SP) IF ZERO THEN JUST 

7588 045632 104402 TYPOC zPRINT THE PC 

14 045634 000137 046210 JMP @F4ERTS 

7591 045640 022700 000377 1$: CMP #377 ,RO 

7592 045644 001005 BNE 20$ 

7593 045646 016600 000004 MOV 4 (SP) .RO 

7 045652 011000 MOV (RO) ,RO 

7595 045654 062700 000400 ADD #400,R0 

7596 045660 005300 c0$: DEC RO OTHERWISE MAKE RO AN 

7597 045662 006300 ASL RO 7 INDEX FOR THE TABLE. 

7598 045664 006300 ASL RO 

7599 045666 006300 ASL RO 

y's 045670 062700 001442 ADD ASERRTB,RO 

7602 045674 012037 045704 MOV (RO) +, aA2$ :PICK UP THE ADDRESS 

7603 045700 001404 BEQ 3$ :OF THE EM, ERROR MESSAGE 

7604 045702 104401 TYPE 

7605 045704 000000 2$: - WORD 

7606 045706 104401 TYPE 

A yf 045710 001313 -WORD $CRLF 

7609 045712 012037 045722 3$: MOV (RO) +, aa4$ :GET THE DH,DATA HEADER 

7610 045716 001404 BEQ 5$ 

7611 045720 104401 TYPE 

7612 045722 000000 4$: -WORD 0 

7613 045724 104401 TYPE 

oie 045726 001313 -WORD $CRLF 

7616 045730 010146 5$: MOV R1,=(SP) SAVE R1,R2 AND R3 


7617 045732 010246 MOV R2,~(SP) 
7618 045734 010346 MOV R3,-(SP) 


L 
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ERROR TYPE OUT ROUTINE SEQ 0193 


7619 
ose 045736 012001 (RO)+,R1 GET THE ADDRESS OF THE 


6 ;DATA TABLE. 
ress 045740 001516 ERTS ;RETURN IF NO DATA. 


Se 045742 011000 (RO) ,RO ;GET A POINTER TO THE DATA 


;FORMAT TABLE. 
7626 045744 105716 (RO) FORMAT ZERO? 





CKFPCAO FPIIF FLTG rime PRT C 


ERROR TYPE OUT 


7628 045746 
7629 
7630 045750 
7631 045752 
¢ 045754 
045756 
045756 
2 045762 


7683 
7684 046110 


122710 
001020 


013102 


122710 
001004 


013146 
104403 

016 

000 
000435 
122710 
001005 


012137 
104401 


000000 
000427 
122710 


000002 


000005 


046104 


w 
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7$ 
@(R1)+,=(SP) 
ERT2 


#2,(RO) 
9$ 


a(R1)+,R2 
(R2)+,-(SP) 


SPACE 
(R2) ,-(SP) 
ERT2 


#3,(RO) 
10$ 


a(R1)+,R2 
(R2)+,-(SP) 


SPACE 
(R2)+,=(SP) 
SPACE 
(R2)+,-(SP) 


SPACE 

(R2) ,-(SP) 
ERT2 

#4, (RO) 
11$ 


a@(R1)+,-(SP) 
16 

0 

ERT2 

#5, (RO) 

13$ 


(R1)+,a412$ 


0 
ERT3 
#11, (RO) 


FORMAT ZERO SO TYPE 
AN OCTAL NUMBER. 


;FORMAT TWO? 


;FORMAT TWO SO TYPE TWO 
SOCTAL NUMBERS. 


FORMAT THREE? 


;FORMAT THREE SO TYPE 
7FOUR OCTAL NUMBERS. 


;FORMAT FOUR? 


z:FORMAR FOUR SO TYPE 
:AN OCTAL NUMBER 
; SUPPRESSING LEADING ZEROES. 


FORMAT FIVE? 


;FORMAT FIVE SO TYPE AN 
SASCIZ STRING. 


FORMAT ELEVEN? 


SEQ 0194 








; N 1 
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ERROR TYPE OUT ROUTINE SEQ 0195 

7685 046114 001005 BNE 15$ 
7687 046116 013137 046124 MOV a(R1)+,aa14$ :FORMAT ELEVEN SO PICK 
7688 046122 104401 . TYPE *A POINTER TO AN ASCIZ 
7689 046124 000000 14$: .WORD 0 STRING. 
7690 046126 000417 BR ERT3 
7692 046130 122710 000012 15$:  CMPB—s #12, (RO) :FORMAT TWELVE? 
7693 046134 001011 BNE 17$ 
7695 046136 013102 MOV a(R1)+,R2 :FORMAT TWELVE SO TYPE 
769% 046140 012703 000006 MOV #6 ,R3 [TYPE SIX OCTAL NUMBERS 
7697 046144 012246 16$: MOV (R2)+,=(SP) 
7698 046146 104402 TYPOC 
7699 046150 104401 TYPE 
7700 046152 0464 D SPACE 
7701 046154 077305 $08 R3,16$ 
7702 046156 BR ERT 
7704 046160 000000 17$: HALT s UNDEF INED FORMAT FOR DATA????? 
7706 046162 104401 ERT2: TYPE :PRINT A TAB AFTER TYPING 
7707 046164 046435 .WORD $TAB TAN DATA TABLE ENTRY 
7708 “OF ALL FORMATS EXCEPT 
7709 [ASCIZ, FORMATS 5 OR 11 
7711 046166 005200 ERT3: INC RO :POINT TO THE NEXT FORMAT 
7712 046170 005711 TST (R1) ‘END OF DATA TABLE. 
7713 046172 001401 BEQ ERTS 
aay 046174 000663 BR ERT1 
7716 046176 104407 ERT4: TYPE : DONE. 
7717 046200 001313 .WORD $CRLF . 
7718 046202 012603 MOV (SP) +,R3 :RESTORE R1,R2 AND R3 
7719 046204 012602 MOV (SP) +-R2 
7720 046206 012601 MOV (SP) +2R1 
7721 046210 + 012600 ERTS: MOV (SP) +-RO :RESTORE RO. 
7722 046212 | 000207 RTS PC SAND RETURN. 
7723 
7724 
7725 
7726 
7727 .SBTTL FPP SPURIOUS TRAP TO 244 HANDLER 
7728 FFARR AERA AEE EEEEREEREREREEEEEEKEREEEAEEEEEKEKEEEEEEEEKEEKE 

DL ARERR AREER EREREKEEERERE EERE R EE 
7729 >*THIS ROUTINE HANDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR AT 244. 
7730 :*THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS BEEN RECORDED 
731 S*THESE ALONG WITH THE FEC, FPS AND PC OF TRAP ARE REPORTED. 

** 
7733 046214 011637 001236 FPSPUR: MOV (SP) ,awSTMP2 :SAVE PC OF TRAP. 
7734 046220 022626 CMP (SP)+, (SP)+ SRESTORE SP. 
7735 046222 170200 STFPS RO “GET FPS 
7736 046224 010037 001240 MOV RO, aS TMP3 
7737 046230 170300 STST R :GET FEC 
7738 046232 010057 001242 MOV RO, a#STMP4 


7739 046236 1046377 1$: ERROR +377 
7740 046240 000441 -WORD 441 


CKFPCAO FPIIF FLTG PNT PRT C 


FPP SPURIOUS TRAP TO 244 HANDLER 


774) 


7742 
7743 


046242 


046244 


046264 


66 046304 


4 
046310 


046314 


104412 


000137 


011637 


000137 


011637 
022626 
104377 


000443 
104412 


000137 


011637 
000002 


042524 


001236 


042524 


001236 


042524 


001110 
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RSE TUP ;GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS ee ae 
; THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G?). 

JMP a4$E OP 


-SBTTL CPU SPURICUS TRAP TO 4 HANDLER 


SLR AAA AAA EAARAAAAAAERAERARERARAAAAREREEAREAAEHEARAEAAEREREEEROEEE 
5 RRR ERAARAAEAAAARAAEAARARARAAARARATAARARAERAAARAEARARAEHEREARHAREAREAAREE 


S*THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 4. 


-* 
CPSPUR: MOV (SP) ,@#STMP2 SAVE PC OF TRAP. 
CMP (SP)+,(SP)+ 
1$: ERROR +377 
«WORD 442 
RSE TUP 760 INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS ee a 


I 
THE DESIRE TO CHANGE THE SOF TWARE 
[VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;THE USER TYPED CONTROL G?). 
JMP a4SEOP 


-SBTTL CPU SPURIOUS TRAP TO 10 HANDLER 


J FTAA ERERRAERARERAARRREAEREREREARARERERERRERRREREREREHEED 
GAARA RAAEEAAERRRAERAARARAAERRARARAEAARAERAEEARERARAAREEREAREEEEE 


;*THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10. 


-* 
CPTWO: MOV (SP) ,@#STMP2 SAVE PC OF TRAP. 
CMP (SP) +, (SP)+ 
1$: ERROR +377 
«WORD 443 
RSE TUP 3GO INITIALIZE THE FPS AND STACK; AND 


;SEE IF THE USER HAS ei 
7; THE DESIRE TO CHANGE THE SOF TWARE 
VIRTUAL CONSOLE SWITCH 5 saan (HAS 
; THE USER TYPED CONTROL G?) 

JMP av$EOP 


-SBTTL SET LOOP ON ERROR ADDRESS ROUTINE 


SEERA EEREEEEREREERERREREAEREEEREEEREKREREEKE 
MAAR AAARARASAASZASAAASAASZALALARRRRSARARERRSRRERARASARR RRR RRR RR RRR ASD 


PER: at (SP) ,@#$LPERR 


Be Be Be 


* 
ok 


-SBTTL FLAG RESET AND CONSOLE TEST ROUTINE 


J FRA ARARAEREREERERREEERERREREERERAEREEAAEARAEARAAEARREEHRHER ERE 
SEAR AAA AERA AEAEERERREREEEREERERTERRAEERREREEAREAERERARREEEE ERED 


7*THIS ROUTINE WILL BE CALLED AT THE END OF EACH TEST TO 
;*RESET THE STACK, CLEAR THE FPS AND SEE IF THE USER HAS TYPED 


SEQ 0196 | 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0197 
7782 :* CONTROL G ON THE TERMINAL. IF THE USER HAS TYPED CONTROL G AND 
7783 7; * THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 
7784 ;*O0F THE SOFTWARE SWITCH REGISTER WILL BE TYPED IN OCTAL ON THE 
ae 3 ;*TELETYPE AND THE USER CAN MODIFY IT. 

*® 
7787 046316 023727 001140 177570 .RSET: CMP @ASWR 4177570 , Ae IF THERE IS A PHYSICAL 
7788 ONSOLE SWITCH REGISTER. 
7789 046324 001001 BNE 1$ CH IF NO. 
7790 046326 104406 CKSWR “OTHERWISE TYPE THE CONTENTS 
7791 sOF THE PROGRAM VIRTUAL SWITCH REGISTER 
has ZW GIVE THE USER A CHANCE TC 
7794 046330 012737 046214 000244 1$: MOV MF PSPUR ,@AFPVECT 
7795 046336 012737 046250 000004 MOV A#CPSPUR , @FERRVE C) 
046344 012737 046270 000010 MOV #CPTWO,a410 
7797 046352 011600 MOV (SP) ,RO 7; SAVE RETURN ADDRESS. 
046354 012706 001100 MOV #STACK,SP sRESET THE STACK POINTER. 
7799 046360 005 CLR RG ;CLEAR THE FPS. 
7800 046362 170104 LDFPS RG 
7801 046364 000110 JMP (RO) ;RETURN. 
7802 
7803 
7804 -NLIST BEX 
7805 
7807 > THESE ARE SPECIAL MESSAGES: 
7808 046 200 120 117 POWERM: .ASCIZ <CRLF>*POWER FAILURE. PROGRAM RESTARTING.’ 
7 0464 32 040 040 000 SPACE: .ASCIZ ° °* 
a Ay 046435 011 000 $TAB: -ASCIZ <TAB> 
7812 046437 107 117 124 MS1: nt IZ ‘GOT RESULT: '<TAB><TAB> 
7813 046455 105 130 120 MS2: SC1Z "EXPECTED RESULT: '<TAB> 
7814 046477 101 103 040 MS3: ASI? AC OPERAND: '<TAB><TAB> 
7815 046515 1 117 125 MS4: “ASCIZ "SOURCE OPERAND: ‘<TAB> 
7816 046477 MS1 3 
7817 046537 105 130 120 MS11: ASCIZ ‘EXPONENT OPERAND: '<TAB> 
7818 046562 114 117 101 MS20: “ASCI1Z "LOADED: '<TAB><TAB> 
7819 046574 124 122 111 MS21: -ASCIZ ‘TRIED TO LOAD: '<TAS> 
7821 ; THESE ARE ERROR MESSAGES: 
7826 046614 123 124 106 EM1: -ASCIZ ‘STF A,AC7 DID NOT TRAP. FID=0.' 
123 124 106 EM2: eASCIZ ‘STF A “AC7. FPS BAD. FID=0. . 
7828 046706 123 124 106 EM3: eASCIZ ‘STF A “AC7. FEC BAD. FID=0.' 
32 046741 EMG: 
046741 123 124 106 -ASCIZ \STF A,(R). RO BAD. FDST FAILED.\ 
7836 047001 EMS: : 
047001 123 124 106 -ASCII \STF A,(R) FAILED.\ 
7837 047022 000 -BYTE O 
7841 047023 EM6: 
047023 123 126 106 -ASCII \STF A,(R). FDST FAILED.\ 
7842 047052 200 050 102 eASCIZ <CRLF>\(BUT FD) ST 707 WENT TO 245 INSTEAD OF 244.\ 
7843 047127 EM7: 
047127 123 124 106 eASCIZ \STF A,(R)+. RO BAD. FDST FAILED.\ 
7844 047170 —EM10: 
047170 123 124 106 ASCII \STF A,(R)* FAILED.\ 
7845 047212 000 “BYTE 0 


D 16 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0198 

7846 047213 EM11: 

047213 123 124 104 -ASCIZ .\STD A,(R)*. RO BAD. FDST FAILED.\ 
7847 047254 EM12: 

047254 123 124 104 ASCII \STD A,(R)* FAILED. \ 
7848 047276 000 -BYTE 
7849 047277 123 124 1046 —M13: _.ASCIZ ‘STD A,AN TRAP TO 4 IN FDST.' 
7850 047277 EM14=EM13 
7851 047333 M15: 

047333 123 124 104 ASCII \STD A,AN FAILED.\ 
7852 047353 000 -BYTE 0 
7853 047354 120 103 040 EM16: .ASCIZ ‘PC BAD AFTER STD A,AN.° 
7857 047403 EM17: 

7403 123 124 104 -ASCIZ \STD A,=(R) TRAP TO 4 IN FDST.\ 

7858 047441 EM20: 

047441 123 124 104 -ASCIZ \STD A,=-(R). RO BAD. FDST FAILED.\ 
7859 047502 EM21: 

047502 123 124 104 ASCII \STD A,-(R) FAILED.\ 
7860 047524 000 : 0 
7861 047502 EM22=EM21 
7862 047525 EM23: ‘ 

047525 123 124 104 -ASCIZ \STD A,a@(R)+ TRAP TO 4 IN FDST.\ 
7863 047564 EM24: 

047564 123 124 104 eASCIZ \STD A,a(R)+. RO BAD. FDST FAILED.\ 
7864 047626 EM25: 

047626 123 124 104 -ASCII \STD A,@(R)+ FAILED.\ 
7865 047651 000 -BYTE 0 
7866 047652 EM26: 

047652 123 124 104 -ASCIZ \STD A,@-(R) TRAP TO 4 IN FDST,.\ 
7867 047711 EM27: 

047711 123 124 104 -ASCIZ \STD A,@-(R). RO BAD. FDST FAILED.\ 
7868 047753 EM30: 

04/753 123 124 104 ASCII \STD A,a@-(R) FAILED.\ 
7869 047776 000 -BYTE 0 
7870 047777 EM31: 

047777 123 124 104 -ASCIZ \STD A,N(R) TRAP TO 4 IN FDST.\ 
7871 050035 EM32: 

050035 123 124 104 -ASCIZ \STD A,N(R). RO BAD. FDST FAILED.\ 
7872 050076 EM33: 

050076 123 124 104 ASCII \STD A,N(R) FAILED.\ 
7873 050120 000 -BYTE 0O 
7874 050121 EM34: 

050121 123 124 104 -ASCIZ \STD A,@N(R) TRAP TO 4 IN FDST.\ 
7875 050760 EM35: 

501 123 124 104 -ASCIZ \STD A,@N(R). RO BAD. FDST FAILED. \ 

7876 050222 : EM36: 

050222 123 124 104 -ASCII \STD A,@N(R) FAILED.\ 
7877 050245 000 -BYTE 0 
7884 050246 EM37: 

050246 123 124 103 ASCII ‘STCFD A,(R) FAILED." 
7885 050271 000 -BYTE 0 
7886 050272 EM4O: 

050272 123 124 103 ASCII \STCFD A,(R). FPS BAD. \ 
7887 050317 000 -BYTE 0 
7888 050320 EM41: 

050320 123 124 103 ASCII \STCFD A,(R). FEC BAD.\ 
7889 050345 000 -BYTE OQ 


7890 050346 EM42: 
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050346 123 124 103 ASCII ‘STCFD A,(R) FAILED. * 
7891 050371 200 111 116 “ASCIZ <CRLF>" INVERT FDFL ST 767-FAILED." 
7892 050425 EM42 
050425 123 124 103 ASCII \STCFD A,(R). FPS BAD.\ 
05 200 050 102 -ASCIZ <CRLF>\(BUT EZBT) ST 560 WENT TO 061 INSTEAD OF 261.\ 
7894 050531 EM44: 
050531 123 124 103 ASCII "STCFD A,(R) FAILED. * 
7895 050554 200 114 117 -ASCIZ <CRLF>"LOW ORDER BITS CF X11 DID NOT GET 0 ST 766.° 
7896 050631 EM4S 
050631 123 124 103 ASCII ‘STCFD A,(R) FAILED.’ 
7897 050654 200 050 102 ASCIZ. <CRLF>*(BUT OP1C) ST 251 FAILED.' 
7898 050707 EM46: 
050707 123 124 103 ASCII \STCFD A,(R). FPS BAD. 
7899 050734 200 050 102 "ASCIZ. <CRLFD\CBUT EZBT) $1 491 WENT TO 262 INSTEAD OF 062.\ 
7900 051013 EMG 7: 
051013 123 124 103 ASCII "STCFD A,(R) FAILED 
7901 051036 200 050 102 “ASCIZ <CRLFO\CBUT FD) ST 113 WENT TO 415 INSTEAD OF 414.\ 
7902 051113 EMSO 
051113 123 124 103 “ASCII 'STCFD A,(R) FAILED. * 
7903 051136 040 123 114 “ASCII * SIGN BAD. 
7904 051150 200 050 102 -ASCIZ <CRLF>\(BUT ENBT) ST 567 WENT TO 060 INSTEAD OF 460.\ 
7911 051227 EM51 
051227 123 124 103 ASCII "STCDF A,(R) FAILED. * 
7912 051252 000 -BYTE 0O 
7913 051253 EMS2: 
1 123 124 104 -ASCII \STD A,{(R). FPS BAD.\ 
7914 051276 000 “BYTE 0 
7915 051277 EMS3: 
051277 123 124 104 -ASCII \STD A,(R). FEC BAD.\ 
7916 051322 000 -BYTE 0 
7917 051323 EMSS: 
051323 123 124 103 ASCII "STCDF A,(R) FAILED. 
7918 051346 200 111 116 “ASCIZ <CRLF>* INVERT FDFL $1 767 FAILED." 
7919 051402 EMSS 
051402 123 124 103 “ASCII 'STCDF A(R) FAILED.” 
7920 051425 200 122 117 "ASCII <CRLF>"ROUND ERROR, "OR 
7921 051445 200 050 102 “ASCIZ <CRLF>\ (BU) BREAKOUT) ST 400 WENT TO 766 INSTEAD OF 767.\ 
7922 051530 EMS6 
123 124 104 -ASCII \STD_A,(R). FPS BAD. \ 
7923 051553 200 050 102 “ASCIZ <CRLF>\(BUT EZBT) ST 421 WENT TO 062 INSTEAD OF 262.\ 
7924 051632 EMS7 
051632 123 124 104 ASCII \STD A,(R). FPS BAD... 
7925 051655 040 106 111 “ASCII * Flv=0." 
7926 051664 200 050 102 -ASCIZ <CRLF>\(BUT FIV) ST 262 WENT TO 123 INSTEAD OF 103.\ 
7927 051742 EM60: 
051742 123 124 103 “ASCII {STCDF_A,(R) FAILED." 
7928 051765 040 106 111 “ASCII ' FIV= 
7929 051774 200 050 102 -ASCIZ ndetiod FIV) ST 262 WENT TO 103 INSTEAD OF 123.\ 
7930 052052 EM61: " 
052052 123 124 104 -ASCII \STD A,(R). FPS BAD.\ 
7931 052075 200 050 102 “ASCIZ <CRLF>\ (BUT ho ST 147 WENT TO 361 INSTEAD OF 365.\ 
7932 052154 123 124 103 EM62: ASCII ‘STCFD A,AC6. FPS BAD. 
7933 052201 00 050 102 "ASCIZ <CRLFD\(BUT FDST). $1 767 WENT TO 567 INSTEAD OF $77.\ 
52260 123 124 103 EM63: — .ASCIZ*STCFD A,AC6. FEC BAD. 
052306 122 \CLRD (R) FAILED. \ 
7936 052326 105 <CRLF>"ZERO X11 AT ST 770 FAILED." 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0200 
7940 052362 EM65: 
052362 103 114 122 «ASCII \CLRD (R). FPS BAD.\ 
7941 052404 000 -BYTE 0 
7942 052405 EM66: 
052405 103 114 122 -ASCIZ \CLRD (R). RO BAD. FDST FAILED.\ 
7943 052444 EM67: 
052444 103 114 122 -ASCII \CLRD AC7. FPS BAD.\ 
7944 052466 200 050 102 eASCIZ <CRLF>\(BUT FDST) ST 770 WENT TO 607 INSTEAD OF 617.\ 
7945 ReSeee EM70: 


103 114 122 ‘ “ASCII \CLRD AC7. FEC BAD.\ 
000 "BYTE 0 


6 105 107 EM176: ASCz "NEGF AC7. FPS BAD.’ 
16 105 107 —M177: .ASCIZ ‘NEGF AC7. FEC BAD.' 


7948 052613 
7961 052636 EM71: 
052636 116 105 107 . eASCIZ \NEGF A FAILED.\ 
7962 052655 : EM72: 
052655 116 105 107 -ASCIZ \NEGF A. FPS BAD.\ 
7963 052676 EM107: 
052676 116 105 107 -ASCIZ \NEGD (R) TRAP TO 4 IN SRC MODE.\ 
7964 052736 EM73: 
052736 116 105 107 ASCIZ \NEGD (R) FAILED. \ 
7965 052757 EM74: 
052757 116 105 107 -ASCIZ \NEGD (R). RO BAD.\ 
7966 053001 EM75: 
053001 116 105 107 -ASCIZ \NEGD (R). FPS BAD.\ 
7967 053024 EM76: 
053024 101 102 123 -ASCIZ \ABSD (R)+ TRAP TO 4 IN SRC MODE. \ 
7968 053065 EM77: 
053065 101 102 123 -ASCIZ \ABSD (R)* FAILED.\ 
7969 053107 EM100: 
053107 101 102 123 -ASCIZ \ABSD (R)+. RO BAD.\ 
7970 053132 EM101: 
053132 101 102 123 -ASCIZ \ABSD (R)+. FPS BAD.\ 
7971 053156 EM102: 
053156 ~ 101 102 123 -ASCIZ \ABSD -(R) TRAP TO 4 IN SRC MODE.‘ 
7972 053217 EM103: 
053217 101 102 123 eASCIZ \ABSD -(R) FAILED.\ 
7973 paese! EM104: 
053 101 102 123 -ASCIZ \ABSD -(R). RO BAD.\ 
7974 083564 EM105: 
64 101 102 123 eASCIZ \ABSD -(R). FPS BAD.\ 
7975 053310 EM106: 
053310 oy °° 123 -ASCIZ \ABSD a@(R)+ TRAP TO 4 IN SRC MODE. \ 
7976 053352 EM110: 
101 102 123 eASCiZ \ABSD @(R)+ FAILED. \ 
7977 053375 —EM111: 
053375 101 102 123 -ASCIZ \ABSD a(R)+. RO BAD.\ 
7978 053421 EM112: 
053421 101 102 123 ASCIZ \ABSD @(R)+. FPS BAD.\ 
7979 053446 EM113: 
053446 116 105 107 -ASCIZ \NEGD @-(R) TRAP TO 4 IN SRC MODE.\ 
7980 053510 EM114: 
053510 116 105 107 ~ASCIZ \NEGD @-(R) FAILED. \ 
7981 053533 —M115: 
053533 116 105 107 -ASCIZ \NEGD @-(R). RO BAD. \ 
7982 053557 EM116: 
053557 116 105 107 eASCIZ = \NEGD a@-(R). FPS BAD.\ 


CKFPCAQ FP11F FLTG PNT PRT C MACRO M1111 24=SFP=79 
FLAG RESET AND CONSOLE TEST ROUTINE 


7983 053604 —M117: 

053604 101 102 123 ~ASCI2 
7984 053645 EM120: 

, 101 102 123 ~ASCIZ 
7985 053667 EM121: 

053667 101 102 123 ~ASCIZ 
7986 053712 EM122: 

053712 101 102 123 sASCIZ 
7987 053736 EM123: 

053736 116 105 107 " ASCIZ 
7988 054000: EM126: 

054000 116 105 107 LASCIZ 
7989 054023 EM125: 

054023 116 105 107 “ASCIZ 
7990 054047 EM126: 

054047 116 105 107 LASCIZ 
7991 054074 EM127: 

054074 116 105 107 LASCIZ 
7992 054136 EM130: 

054136 116 105 107 LASCIZ 
7993 054161 M131: 

054161 116 105 107 ~ASCIZ 
799% 054206 EM132: 

054206 101 102 123 ~ASCIZ 
7995 054251 EM133: 

054251 101 102 123 ~ASCIZ 
799% 054275 : EM134: 

054275 101 102 123 ~ASCIZ 
8006 054323 116 105 107 €M135: [ASCII 
8007 054341 200 130 117 “ASCIZ 
8008 054376 EM136: 

054376 116 105 107 LASCIZ 
8009 054415 EM137: 

054415 116 105 107 LASCIZ 
8010 054436 EM140: 

054436 116 105 107 ~ASCIZ 
8011 054457 EM141: 

054457 116 105 107 ~ASCIZ 
8012 054526 EM142: 

054526 116 105 107 LASCIZ 
8013 054551 EM143: 

4551 116 105 107 “ASCIZ 
8014 054573 EM144: 

054573 116 105 107 LASCIZ 
8015 054643 EM145: 

054643 116 105 107 -ASCIZ 
8016 054667 EM146: 

054667 116 105 107 ~ASCIZ 
8017 054711 EM147: 

054711 116 105 107 ~ASCIZ 
8018 054761 EM150: 

054761 116 105 107 .ASCIZ 
8019 055005 M151: 

055005 116 105 107 LASCIZ 
8020 055030 EM152: 

5 116 105 107 LASCIZ 


8021 055101 : EM153: 


15:03 PAGE $015 
SEQ 0201 
\ABSD N(R) TRAP TO 4 IN SRC MODE. \ 
\ABSD N(R) FAILED. \ 
\ABSD N(R). RO BAD.\ 
\ABSD N(R). FPS BAD. \ 
\NEGD @N(R) TRAP TO 4 IN SRC MODE. \ 
\NEGD @N(R) FAILED. \ 
\NEGD @N(R). RO BAD. \ 
\NEGD @N(R). FPS BAD. \ 
\NEGD N(R7) TRAP TO 4 IN SRC MODE.\ 
\NEGD N(R7) FAILED.\ 
\NEGD N{R7). FPS BAD. \ 
\ABSD @N(R7) TRAP TO 4 IN SRC MODE. \ 
\ABSD @N(R7) FAILED. \ 
\ABSD @N(R7). FPS BAD.\ 
<CRLF>*XOR. SIGN BIT ST 336 FAILED. 
\NEGD A FAILED. \ 
\NEGD A. FPS BAD.\ 
\NEGD (R) FAILED.\ 
\NEGD (R). RO BAD. SPECIAL DEST FAILED.\ 
\NEGD (R). FPS BAD. \ 
\NEGD (R)+* FAILED. \ 
\NEGD (R)+. RO BAD. SPECIAL DEST FAILED.\ 
\NEGD (R)+. FPS BAD. \ 
\NEGD -(R) FAILED. \ 
\NEGD -(R). RO BAD. SPECIAL DEST FAILED. \ 
\NEGD -(R). FPS BAD.\ 
\NEGD a(R)+* FAILED. \ 
\NEGD a(R)*. RO BAD. SPECIAL DEST FAILED. \ 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0202 
055101 116 105 107 ASCIZ \NEGD a(R)+. FPS BAD.\ 
8022 055126 EM154: 
126 116 105 107 ASCIZ \NEGD @=(R) FAILED. \ 
8023 055151 EM155: 
055151 116 105 107 .ASCIZ \NEGD a-(R). RO BAD. SPECIAL DEST FAILED. \ 
8024 055222 EM156: 
0 116 105 107 .ASCIZ \NEGD @=(R). FPS BAD. \ 
8025 055247 EM157: 
055247 116 105 107 “ASCIZ \NEGF (R)* FAILED.\ 
8026 055271 116 105 107 €M160: ‘ASCII ‘NEGF (R)+. RO BAD. 
8027 055313 102 101 104 TASCIZ "BAD CONSTANT USED. SPECIAL DEST FAILED." 
8028 055363 EM161: 
055363 116 105 107 ASCIZ \NEGF (R)+. FPS BAD.\ 
8029 055407 EM162: 
055407 116 105 107 ASCIZ \NEGD (R7)+ FAILED.\ 
8030 055432 EM163: 
055432 116 105 107 ASCIZ \NEGD (R7)+. FPS BAD. \ 
8031 055457 120 103 040 EM164: “ASCIZ ‘PC BAD AFTER NEGD (R7)+. BAD CONSTANT USED.* 
8036 055533 EM215: 
055533 120 103 040 ASCII \PC BAD AFTER NEGD N(R). BAD CONSTANT USED 746 746.\ 
055615 200 117 122 "ASCIZ <CRLF>*OR (BUT FDST) IN SPECIAL DEST FAILED. * 
8037 055664 EM216: 
55664 116 105 107 -ASCIZ \NEGD N(R) FAILED.\ 
8038 055706 EM217: 
055706 116 105 107 -ASCIZ \NEGD N(R). RO BAD. SPECIAL DEST FAILED. \ 
8039 055756 EM220: 
055756 116 105 107 ASCIZ \NEGD N(R). FPS BAD.\ 
056002 M221: 
056002 120 103 040 ASCII \PC BAD AFTER NEGD @N(R). BAD CONSTANT USED 747 747.\ 
056065 200 117 122 "ASCIZ <CRLF>*OR (BUT FDST) IN SPECIAL DEST FAILED." 
8041 056134 , EM222: 
056134 116 105 107 ASCIZ \NEGD @N(R) FAILED. \ 
8042 056157 EM223: 
056157, «116 105 107 ASCIZ \NEGD @N(R). RO BAD. SPECIAL DEST FAILED.\ 
8043 056230 EM224: 
056230 116 105 107: ASCIZ \NEGD @N(R). FPS BAD.\ 
8059 056255 _ EM165: 
056255 116 105 107 ASCIZ. \NEGD (R) FAILED.‘ 
8060 056276 EM166: 
056276 101 102 - 123 ASCIZ \ABSD (R) FAILED.\ 
8061 056317 EM167: 
056317 124 123 124 ASCIZ \TSTD (R) FAILED. \ 
8062 056340 EM170: 
5634 116 105 107 ASCIZ \NEGD (R). FPS BAD. \ 
8063 056363 EM171: 
56363 101 102 123 ASCIZ \ABSD #). FPS BAD. \ 
8064 056406 EM172: 
056406 124 123 124 -ASCIZ \TSTD (R). FPS BAD.\ 
8065 056431 EM173: 
56431 116 105 107 ASCIZ \NEGD (R). FEC BAD. \ 
8066 056454 EM174: 
056454 101 102 123 .ASCIZ \ABSD (R). FEC BAD.\ 
8067 056477 EM175: 
056477 124 123 124 ASCIZ \TSTD (R). FEC RAD. \ 
8068 056522 M200: 
565 116 105 107 ASCII \NEGD (R) FAILED. \ 


056522 
8069 056542 200 130 117 eASCIZ <CRLF>'XOR SIGN BIT FAILED ST 336." 


8070 056577 

056577 
8071 056621 
8072 Ea ghle 


056700 
8073 056722 
8074 057001 

— 057001 
8075 057021 
8076 057102 
8077 057161 


8083 057436 
057436 
8084 057456 
8085 057535 
057535 
8086 057555 
8087 057634 
057634 
8088 057654 


810 

8108 060315 
060315 

8109 060340 

8110 060364 
060364 


8116 060516 
060516 


CKFPCAC FPIIF FLTG ONT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


MACRO M1111 


EM201: 


EM202: 


EM203: 


EM204: 


EM205: 


EM206: 


EM207: 


EM210: 


EM211: 


EM212: 


EM213: 


EM214: 


EM225: 


EM226: 
EM227: 


EM231: 
EM232: 


EM233 


>> b> bd Bd 
won nn nn WMH 


>> 
nn 


>> 
nn 


>>> 
naw 


>>> 
nan 


NOD DOD aN aon On an aon an 
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\NEGD (R). FPS BAD.\ 
<CRLF>\ (BUT ENBT) ST 336 WENT 


\NEGD (R). FPS BAD. \ 
<CRLF>\(BUT ENBT) ST 336 WENT 


\ABSD (R) FAILED.\ 
<CRLF>* (BUT OP1B) ST 055 WENT 
<CRLF>\(BUT ENBT) ST 335 WENT 


\ABSD (R) FAILED.\ 
<CRLF>*XOR SIGN BIT FAILED ST 


\TSTD (R) FAILED.\ 
<CRLF>\(BUT OP1B) ST 055 


\TSTD (R). FPS BAD. \ 
<CRLF>\(BUT ENBT) ST 334 


\TSTD (R) FAILED.\ 
<CRLF>\ (BUT OP1B> 


\TSTD (R) FAILED.\ 
<CRLF>\(BUT ENBT) ST 334 


\TSTD (R) FAILED.\ 
<CRLF>\ (BUT OP1B) ST 255 


\TSTD (R). FPS BAD.\ 
<CRLF>\(BUT ENBT) ST 310 


\TSTD (R). FPS BAD.\ 
* FIUV=0, OPERAND=-0.' 
<CRLF>\ (BUT FIUV) ST 257 


\TSTD (R). FPS BAD.\ 
" FIUV=1, OPERAND=-0." 
<CRLF>\(BUT FIUV) ST 257 WENT 


WENT 
WENT 
ST 057 WENT 


WENT 


WENT 


WENT 


\LDFPS (R). RO BAD.\ 
\LDFPS (R). FPS BAD.\ 
\LDFPS (R) TRAPPED TO 4.\ 


(R)+, RO BAD.\ 
(R)+, FPS BAD. \ 
(R)+* TRAPPED TO 4.\ 


\LDFPS 
\LDFPS 
\LDFPS 


\LDFPS -(R). RO BAD.\ 





WENT 1 


INSTEAD 


INSTEAD 


INSTEAD 
INSTEAD 


INSTEAD 


INSTEAD 


INSTEAD 


INSTEAD 


OR 312 INSTEAD OF 310.\ 


INSTEAD OF 002.\ 


INSTEAD OF 255.\ 


INSTEAD OF 355.\ 


OF 


OF 


OF 
OF 


OF 


OF 


OF 


OF 





SEQ 0203 


453.\ 


053.\ 


335, OR’ 
052.\ 






334.\ 





053.\ 


334.\ 


453.\ 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0204 

8117 060542 EM234: 

060542 114 104 106 ASCIZ \LDFPS -(R). FPS BAD.\ 
8118 060567 EM235: 
8119 060567 114 104 106 -ASCIZ \LDFPS =-(R) TRAPPED TO 4.\ 
8120 060620 EM236: 

060620 114 104 106 eASCIZ \LDFPS @(R)+. RO BAD.\ 
8121 060645 EM237: 

060645 114 104 106 eASCIZ \LDFPS a(R)+, FPS BAD.\ 
8122 060673 EM240: ‘ 
8123 060673 114 104 106 eASCIZ \LDFPS a@(R)* TRAPPED TO 4.\ 
8124 060725 EM24i: 

060725 114 104 106 eASCIZ \LDFPS a@-(R). RO BAD.\ 
8125 060752 EM242: 

060752 114 104 106 : -ASCIZ \LDFPS a-(R). FPS BAD. \ 
8126 061000 EM243: 
8127 061000 114 104 106 -ASCIZ \LDFPS a-(R) TRAPPED TO 4.\ 
8131 
8132 061032 EM244: 

061032 114 104 106 -ASCIZ \LDFPS N(R). RO BAD.\ 
8133 061056 EM245: 

061056 114 106 106 eASCIZ \LDFPS N(R). FPS BAD.\ 
8134 061103 EM246: 

061103 120 103 040 -ASCIZ \PC BAD AFTER LDFPS N(R).\ 
&135 061134 EM247: 
8136 061134 114 104 10€ -ASCIZ \LDFPS N(R) TRAPPED TO 4.\ 
8137 061165 EM250: 

061765 114 104 106 eASCIZ \LDFPS @N(R). RO BAD.\ 
8138 061212 EM251: 

061212 114 104 106 ~ASCIZ \LDFPS @N(R). FPS BAD. \ 
8139 061240 EM2S2: 

061240 120 103 040 -ASCIZ \PC BAD AFTER LDFPS @N(R).\ 
8140 061272 EM253: 
816) 061272 114 104 106 -ASCIZ \LDFPS @N(R) TRAPPED TO 4.\ 
8142 061324 EM254: 

061324 120 103 040 -ASCIZ \PC BAD AFTER LDCLD (R7)+*,A.\ 
8143 061360 EM255: 
ar 061360 114 104 103 eASCIZ \LDCLD (R7)+,A TRAPPED TO 4.\ 
8145 061414 EM256: 

061414 114 104 103 eASCIZ \LDCLD (R)+,A. RO BAD.\ 
8146 061442 EM257: 
8147 061442 114 104 103 ASCIZ \LDCLD (R)*+,A. FPS BAD.\ 
8154 
8155 061471 EM260: 

061471 114 104 103 ASCII \LDCIF OR LDCLF (R),A FAILED.\ 
8156 061525 000 -BYTE 0 
8157 061526 EM261: 

061526 114 104 103 eASCII \LDCIF OR LDCLF (R),A. FPS BAD. \ 
8158 061564 000 -BYTE 0 


8159 
8160 061565 EM262: 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0205 
061565 114 104 103 ASCII \LDCIF (R),A FAILED. \ 
aie: 061610 200 050 102 eASCIZ <CRLF>\(BUT FL) ST 277 WENT TO 300 INSTEAD OF 307.\ 
8163 061665 EM263: 
061665 114 104 103 ASCII \LDCLF (R),A. FPS BAD.\ 
be: 061712 000 -BYTE 0 
8166 061713 EM264: 
061713 114 104 103 ASCII \LDCIF (R),A FAILED.\ 
44 061736 200 125 123 -ASCIZ <CRLF>"USED CONSTANT 237 INSTEAD OF 217 ST 1)7.' 
8169 062010 EM265: 
062010 114 104 103 eASCII \LDCIF OR LDCLF (R).A FAILED.\ 
Apa 062044 200 123 105 eASCIZ <CRLF>'SET SIGN BIT FAILED ST 146." 
8172 062101 EM266: 
062101 114 104 103 eASCII \LDCIF OR LDCLF (R),A_FAILED.\ 
he | 062135 200 050 102 eASCIZ <CRLF>\(BUT XNBT) ST 372 WENT TO 152 INSTEAD OF 112.\ 
8175 oes thi EM267: 
062214 114 104 103 ASCII \LDCLF (R),A FAILED 
a 062237 200 125 123 “ASCIZ <CRLF>*USED CONSTANT ‘a7 INSTEAD OF 237 ST 107.' 
8178 062311 EM270: 
062311 114 104 103 ASCII \LDCLF (R),A FAILED.\ 
Ras 062334 040 122 117 -ASCIZ * ROUND ERROR.’ 
8181 062352 EM271: 
062352 114 104 103 ASCII \LDCLF (R),A FAILED.\ 
nat 062375 040 124 122 -ASCIZ * TRUNCATION ERROR." 
8184 062420 EM272: 
062420 114 104 103 ASCII \LDCIF OR LDCLF (R),A FAILED. \ 
Ay of 062454 200 122 061 -ASCIZ <CRLF>'R14 NOT INCREMENTED ST 630.' 
8187 062511 EM273: 
062511 114 104 103 ASCII \LDCID OR LDCLD (R),A FAILED.\ 
8188 062545 000 BYTE O6 
8189 062546 EM274: 
062546 114 104 103 ASCII \LDCID OR LDCLD (R),A. FPS BAD.\ 
ay 062604 000 -BYTE 0 
8192 062605 EM275: 
062605 114 104 103 ASCII \LDCID (R),A FAILED 
aby 062630 200 050 102 “ASCIZ <CRLF>\(BUT FL) ST 3)? WENT TO 300 INSTEAD OF 301.\ 
8195 062705 EM276: 
062705 114 104 103 ASCII \LDCID (R),A FAILED.\ 
oes 062730 200 125 123 ASTIZ <CRLF>"USED CONSTANT 237 INSTEAD OF 217 ST 107." 
8198 063002 EM277: 
063002 114 104 103 ASCII \LDCID (R),A FAILED.\ 
dh 063025 200 123 105 -ASCIZ <CRLF>*SET SIGN FAILED ST 146.° 
8201 062056 EM300: 
063056 114 104 103 ASCII \LDCLD (R),A FAILED 
8202 063101 200 125 123 “ASCIZ <CRLF>*USED CONSTANT ‘a7 INSTEAD OF 237 ST 107.° 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0206 


8203 

8204 063153 EM301: 
063153 105 

8205 063176 


— (R),A FAILED.\ 


EM302: 
\LDEXP (R),A. FPS BAD. \ 


EM303: . "LDEXP (R),A. FEC BAD." 


EM304: 
\LDEXP (R),A FAILED.\ 
<CRLF>"EXCESS 200 CALCULATION ST 624 BAD.' 


EM305: 
\LDEXP (R),A. FPS BAD.\ 
"(BUT ENBT, P2Br, XNBT) ST 625 DID NOT GO 0 304.° 


EM306: 
\LDEXP (R),A. FPS BAD.\ 
<CRLF>* (BUT EZBT) ST $44 WENT TO 504 INSTEAD OF 704, OR’ 
<CRLF>\(BUT EZBT) ST 704 WENT TO 264 INSTEAD OF 064.\ 


\LDEXP (R),A FAILED.\ 
<CRLF>\(BUT EZBT) ST 704 WENT TO 064 INSTEAD OF 264.\ 


\LDEXP (R),A. FPS BAD. 
<CRLF>\(BUT FIU) ST Ba WENT TO 115 INSTEAD OF 155.\ 


\LDEXP (R),A FAILED 
<CRLF>\(BUT FIU) ST “364 WENT TO 155 INSTEAD OF 115.\ 


\LDEXP (R),A FAILED.\ 
<CRLF>\(BUT EZBT) ST 544 WENT TO 704 INSTEAD OF 504.\ 


\LDEXP (R),A FAILED.\ 
<CRLF>\(BUT FiU) ST 504 WENT TO 155 INSTEAD OF 115.\ 


\LDEXP (R),A FAILED 
<CRLF>\(BUT FIV) ST toe WENT TO 116 INSTEAD OF 136.\ 


\LDEXP (R),A FAILED. \ 
<CRLF>\(BUT FIV) ST 104 WENT TO 136 INSTEAD OF 116.\ 


\LDEXP (R),A FAILED.\ 
<CRLF>\(BUT FIV) ST 144 WENT TO 116 INSTEAD GF 736.\ 


\LDEXP (R),A FAILED.\ 
<CRLF>\ (BUT FIV) ST 144 WENT TO 136 INSTEAD OF 116.\ 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0207 
8246 
8247 064747 EM320: 
064747 114 104 105 -ASCII. \LDEXP (R),A FAILED 
8248 064772 200 050 10e "ASCIZ <CRLF>\(BUT FIV) ST “So WENT TO 116 INSTEAD OF 136.\ 
8250 065050 EM321: 
065050 114 104 105 -ASCII. \LDEXP (R),A FAILED. \ 
8251 065073 200 050 102 “ASCIZ <CRLF>\(BUT FIV) ST 344 WENT TO 136 INSTEAD OF 116.\ 
8253 065151 EM322: 
065151 123 124 103 -ASCII \STCDI OR STCDL (R),A FAILED.\ 
8254 065205 000 -BYTE 0 
8256 065206 EM323: 
065206 123 124 103 -ASCII ASTCDI OR STCDL (R),A. FPS BAD.\ 
8257 065244 000 -BYTE. 0 
8259 065245 123 124 103 €M324: .ASCIZ ‘STCDI OR STCDL (R),A. FEC BAD." 
8261 065304 EM325: 
065304 123 124 103 -ASCII \STCDL (R),A. FPS BAD.\ 
8262 065331 200 103 114 "ASCII <CRLF>"CLEAR FLAG ST 774 FAILED, 
8263 065 366 200 050 102 "ASCIZ <CRLF>\(BUT FLAG) ST 662 WENT TO Ses INSTEAD OF 361.\ 
8265 065304 EM326=EM325 
8266 
8267 065445 EM327: 
065445 123 124 103 -ASCII \STCDL (R),A FAILED. \ 
44 065470 200 050 102 eASCIZ <CRLF>\(BUT ENBT) ST $32 WENT TO 473 INSTEAD OF 073.\ 
8270 065547 EM330: 
065547 125 124 103 -ASCII \STCDL (R.A. FPS BAD 
8271 065574 200 050 102 "ASCIZ <URLF>\(BUT FIC) ST a WENT TO 305 INSTEAD OF 315.\ 
8273 065652 EM331: 
065652 123 124 103 -ASCII \STCDL (R),A. FPS BAD 
827% 065677 200 050 102 "ASCIZ <CRLF>\(BUT FIC) ST ai WENT TO 315 INSTEAD OF 305.\ 
8276 065206 EM333=EM323 
8277 
8278 065755 EM334: 
065755 123 124 103 -ASCII \STCDI (R),A. FPS BAD. 
8279 066002 200 125 123 “ASCIZ <CRLF>*USED CONSTANT 3) INSTEAD OF 17 ST 66." 
8281 066051 —M335: 
066051 123 124 103 -ASCII \STCDI (R),A FAILED.\ 
8282 066074 200 050 102 “ASCIZ <CRLF>\(BUT EMT) ST 632 WENT TO 073 INSTEAD OF 473.\ 
8284 066153 EM336: 


066153 123 124 103 ASCII \STCDI (R),A. FPS BAD.\ 


8325 

8326 067574 
067574 

8327 067621 

8328 

8329 067700 
067700 


200 


CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


123 


124 
050 


124 
050 


124 
050 


124 
050 


MACRO M1111 


105 


24-SEP-79 


-ASCIZ 


EM337: 


ASCII 
-ASCIZ 


EM340: 


-ASCII 
-ASCIZ 


EM341: 


-ASCII 
-ASC1Z 


EM342: 


-ASCII 
-ASCIZ 


EM343: 


EM344: 


EM332: 


EM345: 


EM346: 


EM347: 


—M350: 


EM351: 


EM352: 


EM353: 


8 1 
15:03 PAGE 31 
<CRLF>'SET FN ST 473 FAILED. * 


\STCDL (R),A FAILED. 
<CRLF>\(BUT COUT) ST o75 WENT 


\STCDL (R),A FAILED.\ 
<CRLF>\(BUT COUT) ST 275 WENT 


\STCDL (R),A. FPS BAD. 
<CRLF>\(BUT EZBT) ST 37 WENT 


\STCDL (R),A FAILED.\ 
<CRLF>\(BUT COUT) ST 360 WENT 


\STCDL (R),A FAILED.\ 
<CRLF>\(BUT NBIT) ST 654 WENT 


\STCDL (R),A FAILED.\ 
<CRLF>' (BUT COUT) ST 360 WENT 
<CRLF>\(BUT NBIT) ST 654 WENT 


\STCDI (R),A FAILED.\ 


TO 074 


TO 274 


TO 633 


TO 654 


TO 531 


TO 454 
TO 431 


INSTEAD OF 


INSTEAD OF 


INSTEAD OF 


INSTEAD OF 


INSTEAD OF 


INSTEAD OF 
INSTEAD OF 


<CRLF>"USED CONSTANT ‘37 INSTEAD OF 17 ST 66.' 


\STCDI (R),A FAILED 


SEQ 0208 


274.\ 


074.\ 


433.\ 


454.\ 


431.\ 


654, OR' 
531.\ 


<CRLF>\(BUT FL) ST &33 WENT TO 655 INSTEAD OF 654.\ 


\STCFL (R),A FAILED.\ 


<CRLF>"ZERO LOW ORDER PART OF X11 FAILED ST 773." 


— A,(R) FAILED.\ 


a A,(R). FPS BAD.\ 


"MORE THAN ONE WORD ° 


"WRITTEN BY STEXP A,(R)."<CRLF>"ZERO FDFL ST 347 FAILED." 


\STEXP A,(R). FPS BAD. 


<CRLF>\ (BUT ENBT) ST 36 WENT TO 071 INSTEAD OF 471.\ 


\STEXP A,(R). FPS BAD.‘ 


C 


CKFPCAO FPIIF FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 31-1 


FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0209 
its 067725 200 050 102 -ASCIZ <CRLF>\(BUT EZBT) ST 071 WENT TO 072 INSTEAD OF 272.\ 
8332 070004 EM354: 
070004 123 124 105 «ASCII \STEXP A,(R). 
S33? 070031 200 050 102 “ASCIZ  <CRLF>\ (BUT Ever) St on WENT TO 272 INSTEAD OF 072.\ 
8335 070116 EM355: 
7 123 105 -ASC \STEXP A,(R). FPS 


BAD. \ 
<CRLF>\(BUT ENBT) ST 376 WENT TO 471 INSTEAD OF 071.\ 


24 

50 

. 123 —M356: .ASC *STST (R) GOT BAD FEC.*<CRLF> 
2 


II 

4 IZ 

8338 070214 123 I] 
124 eASCIZ ‘AFTER EXECUTING AN ILLEGAL FPP OP CODE.’ 

I] 

IZ 

I] 

IZ 


8339 070242 101 
8340 


8341 070312 123 1 
8342 070340 101 1 
8343 


06 
8344 070410 117 116 114 EM360: .ASC 
fez 070453 123 105 


070110 1 

8336 070135 200 0 
337 

1 

1 


4 123° EM357: ASC *STST (R) GOT BAD FEA. '<CRLF> 
"AFTER EXECUTING AN ILLEGAL FPP OP CODE.’ 


“ONLY ONE WORD WRITTEN BY STST (R). ° 
"SET FDFL ST 636 FAILED. 


alan) 


dD 1 
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FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0210 
8360 
8361 070503 EM4O1: 
070503 123 124 106 -ASCIZ \STFPS (R). RO BAD.\ 
8362 070526 EM4O2: 
070526 123 124 106 -ASCiZ \STFPS (R) FAILED.\ 
8363 070550 115 117 122 EM403: .ASCII ‘MORE THAN ONE WORD WRITTEN BY STFPS (R).* 
8364 070620 200 050 102 -ASCIZ <CRLF>\(BUT GR7,-FL) ST 357 WENT TO 416 INSTEAD OF 417.\ 
8365 070702 EM404: 
B66 070702 123 124 106 -ASCIZ \STFPS (R) TRAPPED TO 4.\ 
8367 070732 EM405: 
070732 123 124 106 -ASCIZ \STFPS (R)+. RO BAD.\ 
8368 070756 EM406: 
070756 123 124 106 -ASCIZ \STFPS (R)+ FAILED.\ 
8369 071001 115 117 122 EM407: .ASCII ‘MORE THAN ONE WORD WRITTEN BY STFPS (R)+.' 
8370 071052 200 050 102 -ASCIZ <CRLF>\(BUT GR7,-FL) ST 357 WENT TO 416 INSTEAD OF 417.\ 
8371 071134 EM410: 
8372 071134 123 124 106 -ASCIZ \STFPS (R)+ TRAPPED TO 4.\ 
8373 071165 EM411: 
071165 123 124 106 -ASCIZ \STFPS =(R). RO BAD.\ 
8374 071211 EM412: 
071211 123 124 106 -ASCIZ \STFPS =(R) FAILED.\ 
8375 071234 115 117 122 EM413: .ASCII ‘MORE THAN ONE WORD WRITTEN BY STFPS -(R).' 
8376 071305 200 050 102 “ASCIZ <CRLF>\(BUT GR7,-FL) ST 357 WENT TO 416 INSTEAD OF 417.\ 
8377 071367 EM414: 
8378 071367 123 124 106 -ASCIZ \STFPS -(R) TRAPPED TO 4.\ 
8379 071420 EM415: 
071420 123 124 106 -ASCIZ \STFPS a(R)+. RO BAD.\ 
8380 071445 EM416: 
071445 123 124 106 eASCIZ \STFPS @(R)+ FAILED. \ 
8381 071471 123 124 106 EM417: .ASCIZ '‘STFPS @(R)+ DID NOT DEFFER THE WRITE.' 
8382 071537 EM420: 
8383 071537 123 124 106 -ASCIZ \STFPS @(R)+ TRAPPED TO 4.\ 
8384 071571 EM421: 
071571 123 124 106 -ASCIZ \STFPS a-(R). RO BAD.\ 
8385 071616 EM422: 
071616 123 124 106 eASCIZ \STFPS a@-(R) FAILED.\ 
8386 071642 123 124 106 EM423: .ASCIZ ‘STFPS @-(R) DID NOT DEFFER THE WRITE." 
8387 071710 EM424: 
8388 071710 123 124 106 -ASCIZ \STFPS @-(R) TRAPPED TO 4.\ 
8389 071742 EM425: 
071742 123 124 106 -ASCIZ \STFPS N(R). RO BAD.\ 
8390 071766 EM426: 
071766 123 124 106 -ASCIZ \STFPS homey FAILED. “ais 
8391 072011 115 117 122 EM427: .ASCII] ‘MORE THAN ONE WORD WRITTEN BY STFPS N(R). 
8392 072062 200 050 102 eASCIZ <CRLF>\(BUT GR7,-FL) ST 357 WENT TO 416 INSTEAD OF 417.\ 
8393 372144 EM430: 
072144 123 124 106 : -ASCIZ \STFPS N(R) TRAPPED TO 4.\ 
ite: 072175 120 103 040 £€M431: .ASCII ‘PC BAD AFTER STFPS N(R). BAD CONSTANT USED." 
8396 072250 EM432: 


072250 123 124 106 eASCIZ \STFPS @N(R). RO BAD.\ 
8397 072275 EM4 33: 


~ywmn 


072275 
8398 072321 
8399 072373 
8400 072455 
072455 
8401 072507 
8402 
8403 072564 
072564 
8404 
8405 072612 
072612 


i et ot od ot ot 


8429 073514 
30 


2 
8433 073547 
8434 


ore 074131 


CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUT! 


=a =i 
= NWN 
Nn 


et nd aed ll nd il oe 
MON —hwm-oO 
OMUONSO- 


MACRO M1111 24-SEP-79 
NE 

106 -ASCIZ 

122 EM434:_ .ASCII 

102 -ASCIZ 
EM435: 

1 -ASCIZ 

040 £EM436: .ASCIZ 
—EM437: 

103 -ASCIZ 
EM440: 

103 -ASCIZ 

123 —M361: .ASCIZ 

116 EM362: .ASCII 

124 -ASCIZ 

106 EM363: .ASCIZ 

120 E—M364: .ASCII 

114 -ASC1Z 

104 EM365: .ASCiZ 

120 € : ,ASCIZ 

116 EM367: .ASCIZ 

120 E—M370: .ASCIZ 
EM371= 
EM372=0 
EM373=0 
EM374=0 
EM375=0 
EM376=0 
—M377=0 
EM400=0 

105 E€M441: .ASCIZ 

105 EM442: .ASCIZ 

105 EM443: .ASCIZ 
; THESE ARE DATA 

124 DH1: ASCII 

120 ASCIZ 
DH2: 

124 -ASCII 

117 -ASCIZ 
DH 

124 ASCII 

117 -ASC1Z 
DH4: 

124 ASCII 

117 -ASCIZ 
DHS: 

124 ASCII 
DH6=DHS 
DH7=DH4 
DH10=DH5 


DH11=DH4 


5 1 
15:03 PAGE 32-1 


\STFPS @N(R) FAILED.\ 
"MORE THAN ONE WORD WRITTEN BY STFPS @N 
<CRLF>\(BUT GR7,-FL) ST 357 WENT TO aie INSTEAD OF 417.\ 


\STFPS @N(R) TRAPPED TO 4 


-\ 
‘PC BAD AFTER STFPS @N(R). BAD CONSTANT USED." 


\STCDL A,(R)+. RO BAD.\ 


\STCDL A,-(R). RO BAD.\ 
"STST (Rd. FPS BAD.' 


eee MEMORY MANAGEMENT TRAP - IMPROPER D=SPACE ACCESS" 
"DIFFERENCE BETWEEN SR1 AND CALCULATED’ 

‘FPP INSTRUCTION FAILED TO ABORT, NOT ‘ 

"ALLOWNG EXAMINATION OF SRi' 

"MODE 0 INSTRUCTION ABORTED WHEN IT SHOULD NOT HAVE‘ 

"FPP ACCUMULATOR WAS CHANGED IN THE EXPECTED ABORT." 

"GENERAL REGISTER WAS — IN THE EXPECTED ABORT" 

‘FPP UNABLE TO RESTORE AN A 


"UNEXPECTED FPP TRAP TO 244.° 
"UNEXPECTED CPU TRAP TO 4." 
"UNEXPECTED CPU TRAP TO 10.' 


TABLE HEADERS: 


. TEST. "<TAB>' PC OF D caaes *<TAB>'PC OF ERROR.' 
<TAB>'FPS.'<TAB>'FEC 


* _TEST.*<TAB>'PC OF CALL. *<TAB>'PC OF ERROR. * 
<TAB>'GOT FPS.*<TAB>*EXPECTED FPS.° 


* TEST.*<TAB>'PC OF CALL.'<TAB>'PC OF ERROR." 
<TAB>'GOT FEC.*<TAB>*EXPECTED FEC." 


"  TEST.*<TAB>'PC OF CALL.'<TAB>'PC OF ERROR." 
<TAB>'GOT RO. '<TAB>'cXPECTED RO.° 


> TEST. '<TAB>'PC OF CALL.*<TAB>*PC OF ERROR." 


SEQ 0211 


CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


8450 
8451 074132 
8452 
8453 4 
8454 074172 
074172 
8455 074232 
56 


1 
074261 
074351 

5 


074071 


040 
074132 
074071 


040 


-2 


OF 
NO 


040 
040 


MACRO M1111 24-SEP-79 


124 


—t ond 
—N 
NS 


124 
124 


DH12=DH5 


DH35=DH4 


H 
DH37: _.ASCIZ 
DH40=DH37 
DH41: _.ASCIZ 
D 37 


bH176=DH2 
DH177=DH3 
DH71=DH5 
DH72=DH2 
DH107=DH13 


DH75=DH2 


- 
15:03 PAGE 32-2 
' TEST. '<TAB>'PC OF CALI.'<TAB>'PC OF TRAP.’ 


* TEST. *<TAB>'PC OF CALL.'<TAB>*PC OF ERROR." 
<TAB>'GOT PC. ‘'<TAB>'EXPECTED PC." 


SEQ 0212 


* TEST."<TAB>'PC OF CALL.'<7TAB>'PC OF ERROR. '<TAB>"GOT FPS.*<TAB>'EXPECTED 
* TEST."<TAB>'PC OF CALL.*<TAB>'PC OF ERROR. '<TAB>'FPS.*<TAB>'GOT FEC. EXPE 


CKFPCAO FPIIF FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


074132 


MACRO M1111 


DH76=DH107 
DH77=DH5 


DH122=DH2 
DH123=DH107 
DH124=DH5 
DH125=DH4 
DH126=DH2 
DH127=DH107 
DH130=DH5 
DH131=DH2 
DH132=DH107 


DH144=DH4 
DH145=DH2 
DH146=DH5 
DH147=DH4 
DH150=DH2 
DH151=DH5 
DH152=DH4 
DH153=DH2 
DH154=DH5 
DH155=DH4 
DH156=DHe 


DH164=DH16 
DH215=DH16 
DH216=DH5 
DH217=DH4 


G 1 
24-SEP=79 15:03 PAGE 32-3 





SEQ 0213 


H 1 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 32-4 


FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0214 
8563 073622 DH220=DH2 
8564 074172 DH221=DH16 
8565 074071 DH222=DH5 
8 7400e DH223=DH4 
8567 73622 DH224=DH2 
8568 074261 DH165=DH37 
8569 074261 DH166=DH37 
8570 074261 DH167=DH37 
8571 074261 DH170=DH37 
8572 074261 DH171=DH37 
8573 074261 DH172=DH37 
8574 074351 DH173=DH41 
8575 074351 DH174=DH41 
8576 074351 DH175=DH41 
8577 074261 DH200=DH37 
8578 074261 DH201=DH37 
8579 074261 DH202=DH37 
8580 074261 DH203=DH37 
8581 074261 DH204=DH37 
8582 074261 DH205=DH37 
8583 074261 DH206=DH37 
8 0742¢' DH207=DH37 
8585 074261 DH210=DH37 
8 074261 DH211=DH37 
8587 074261 DH212=DH37 
8588 074261 DH213=DH37 
F344 074261 DH214=DH37 
8591 074002 DH225=DH4 
8592 073622 DH226=DH2 
8593 074446 040 040 124 DH227: .ASCIZ ‘ TEST.'<TAB>'PC OF CALL.*<TAB>'PC OF TRAP." 
8594 074002 DH230=DH4 
8595 073622 DH231=DH2 
8 074446 DH232=DH227 
8597 074002 DH233= 
8598 073622 DH234= 
8599 074446 DH235=DH227 

074002 DH236=DH4 
8601 073622 DH237=DH 
8602 074446 DH240=DH227 
8603 074002 DH241=DH 
7362 DH242=DH2 
8605 074446 DH243=DH227 
074002 DH244=DH 
860 073€22 DH245=DH2 
8608 074172 DH246=DH16 
8609 074446 DH247=DH227 
8610 074002 DH250=DH4 
8611 073622 DH251=DH2 
8612 074172 DH252=DH16 
8613 074446 DH253=DH227 
8614 074172 DH254=DH16 
8615 074446 DH255=DH227 
8616 074002 DH256=DH4 
8617 073622 DH257=DH2 
8618 074261 DH260=DH37 
8619 074261 DH261=DH37 


CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


074261 


074261 


MACRO M1111 


DH262=DH37 
DH263=DH37 


DH352=DH37 


= 
24-SEP-79 15:03 PAGE 32-5 


SEQ 0215 


CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 
FLAG RESET AND CONSOLE TEST ROUTINE 


074261 


— 


mr 


& 


HSUALSOLKENHS OLS 


1 
1 
1 
1 
1 
1 
1 
. 


MONM—NMN—" 


DH353=DH37 


DH361=DH2 


DH362: 
DH363: 


DH364: 


¢d. 1 
24=-SEP=79 15:03 PAGE 32-6 


* TEST. '<TAB>'PC OF CALL.'<TAB>*PC OF ERROR.' 
<TAB>'GOT FEA. *<TAB>'EXPECTED FEA." 


: TEST" <TAB>' PC OF CALL' <TAB> *PC 

. TEST’ <TAB>'PC OF CALL" <TAB>'PC 

*SR1' <TAB>’ CALCULA TED* 

eer. <TAB>" PC OF CALL'<TAB>'PC 
TO ABORT" 


TEST'<TAB>'PC OF CALL'<TAB>'PC 
TEST*<TAB>*PC OF CALL"<TAB>'PC 


* CHANGED 
* _TEST'<TAB>'PC OF CALL*<TAB>’PC 
<TAB>'RECEIVED'<TAB>'EXPECTED' 

*  TEST*<TAB>*PC OF CALL'<TAB>‘AC 


OF ERROR'<TAB>*MMRO* 
OF ERROR'<TAB> 


OF INSTRUCTION FAILING’ 


OF ERROR’ 
OF ERROR'<TAB>‘AC #' 


OF ERROR'<TAB>’REG #' 
#"<TAB>'PC OF ERROR’ 


SEQ 0216 





K 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 33 
FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0217 


DH401=DH4 


075245 040 : TEST. "<TAB>'PC OF CALL.*<TAB>'PC OF ERROR. *<TAB>" FEC.” 
075313 040 97 Rr, TEST. "<TAB>"PC OF CALL.'<TAB>'PC OF ERROR." 
H 


5 
075354 
075363 


075373 004 : é 4,0,5.0,5.5.2,5.,5.2 
} 075405 004 : 4,0,5.0 


4 
56 075411 004 : ° 4.0.5.0.3.$.3.5.5.3 


075411 





1 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 53-1 
FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0218 


075405 DF 23=DF6 
075363 


5 F 36=DF1 
075423 004 F : F 7 6,6,5.0.5.0.3 BcdcdsBeletotetetes 
075444 004 DF41: 6.0.5.0,5.0,0.0,5.5,3.5.5.5.30303 
79 F37 


4,0,5.0,5.5.3.5.5.3.54543 


3 
5 
8806 
8808 
8809 


85 85 80 80 80 80 G0 60 80 80 
ah anh axl eh ax ax exh ex ax ed 
SOONAOUSWN-—O 


§ 





M 1 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 33-2 
FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0219 


DF 171=DF 37 
075423 DF 172=DF 37 





N 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 33-3 


FLAG RESET AND CONSOLE TEST ROUTINE 
075444 DF 173=DF41 


3 

; 075502 
075512 

7 


DF 257=DF 225 


1 
075516 004 DF260: .BYTE 
3 OF SoLnOr <o8 


54 075516 DF 272=DF 260 
8934 075537 004 000 005 DF273: .BYTE 


4,0,5,0,5.0,5,0 
4.0.5.0 © 


4,0,5,0,5.0,5.0,5,5 2.556205 -502 


4,0,5.0.5.0,5.0.5.5.2.5.5.3.52963 


SEQ 0220 





CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 33-4 


FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0221 
8935 075537 DF 274=DF 273 
8936 075537 DF 275=DF 273 
8937 075537 DF 276=DF 273 
075537 DF 277=DF 273 
8939 075537 DF 300=DF 273 
8940 075560 004 000 00S DF301: .BYTE 4,0,5,0,5.0,5.0,5,5,3,5.5,0,5,5,3,5,5.3 
8941 075560 DF 302=DF 301 
8942 075604 004 000 00S OF303: BYTE 4,0,5,0,5,0,0,0,5,5,3,5,5,0,5,5,3,5,5.5 

8943 075560 DF 304=DF 301 
8944 075560 DF 305=DF 301 
8945 075560 DF 306=DF 301 
8946 075560 DF 307=DF 301 
8947 075560 DF 310=DF 301 
8948 075560 DF 311=DF 301 
560 DF 312=DF 301 
8950 075560 DF 313=DF 301 
8951 075560 DF 314=DF 301 
8952 075560 DF 315=DF 301 
8953 075560 DF 316=DF 301 
4 075560 DF 317=DF 301 
8955 075560 DF 320=DF 301 
te) 075560 DF 321=DF 301 

8958 075630 004 000 005 DF322: .BYTE 4,0,5,0,5,0,5.0,5.5,3,5.5,2,5.522 
8959 075630 DF 323=DF 322 

8960 075651 004 000 OOS DF324: .BYTE 4,0,5,0,5,0.0,0,5,5,3,5,5.2,5,5.2 
8961 075630 DF 325=DF 322 
075630 DF 326=DF 322 
8963 075630 DF 327=DF 322 
075630 DF 330=DF 32¢ 
8965 075630 DF 331=DF 322 
075630 DF 332=DF 322 
8967 075630 DF 333=DF 322 
075630 DF 334=DF 322 
8969 630 DF 335=DF 322 
8970 075630 DF 336=DF 322 
8971 075630 DF 337=DF 322 
8972 630 DF 340=DF 322 
8973 075630 DF 341=DF 322 
8974 630 DF 342=DF 322 
8975 075630 DF 343=DF 322 
8976 075630 DF 344=DF 322 
8977 075630 DF 345=DF 322 
pat} 075630 DF 346=DF 322 

8980 075672 004 000 005 DF347: .BYTE 4,0,5,0,5.0,5.,0.5.5.3,5,5.0,5.5,0 
8981 075672 DF 350=DF 347 
8982 075512 DF 351=DF 227 
8983 075672 DF 352=DF 347 
075672 DF 35 3=DF 347 
8985 075672 DF 354=DF 347 
075672 DF 355=DF 347 
8937 075502 DF 356=DF 225 
075502 DF 357=DF 225 
8989 075512 DF 360=DF 227 


075502 DF 361=DF 225 





CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE $3.8 
FLAG RESET AND CONSOLE TEST ROUTINE SEQ 0222 


8992 075713 004 000 005 DF362: .BYTE 

8993 075721 004 090 005 ts 

8994 075405 

8995 075405 

8996 075730 004 005 DF366: .B 0 0,5.5,0,0,0,0,5.5,0,0,0.0 
8997 075752 005 : re 

8998 075762 005 : 0 5,5,0,0,0,0,5,5,0,0,0,0 
8999 37 


2 

: -BYTE 4,0,5.,0,5,0 

DF442=DF441 

DF 443=DF441 
-EVEN 


THESE ARE THE ERROR MESSAGE DATA TABLES: 





ne eRE REE STREET TTTTTTTT TTT ATT KK AKAMA A KKH KR KR RR KR KR KR KR RRR RRA ROCCO. MOG 


De 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 33-6 


FLAG RESET AND CONSOLE TEST ROUTINE 
9049 076012 


046435 


046435 
001313 


. WORD 
DT40=DT37 
046435 DT41:  .WORD 
001240 . WORD 
DT42=DT37 


D 
DI65=DT16 
DT66=DT4 


STMPO, pat $TAB,STMP2,$TAB,STMP3,STMP4 ,0 
STMPO,STMP1 .STAB, STMP2,$TAB,SIMP3,$TAB, SIMP5,0 
$TMPO,STMP1 .$TAB,STMP2, STAB, STMP4 ,$TAB, SIMPG,0 
STMPO,.STMP1,$TAB,STMP2, STAB, STMP4 ,$TAB,STMP3,0 
$TMPO,STMP1 STAB. STMP2,SCRLF MS1,$TMP3 

SCRLF .MS2,$TMP4, 

$TMPO,$TMP1 ,$TAB, STMP2,0 


$TMPO,STMP1,$TAB,$TMP2,$TAB,STMP4 ,$TAB,STMP3,0 


STMPO,STMP1,$TAB,STMP2,$TAB,STMP7 STAB, STMP10,$CRLF 
MS4,STMP3,$CRLF .MS1,$TMP4.$CRLF .MS2,$TMP5S,0 


$STMPO,STMP1,$TAB,STMP2, STAB, STMP7,STMP11,$TMP12 
SCRLF .MS4,$TMP3,$CRILF .MS1,$TMP4,SCRLF .MS2,$TMP5 ,0 


SEQ 0223 





PREMIERE RIRERERERIRERIRIRERERIRIRI RIAL ALREALALRIALAIAIMIMIALNININMMNAMNMNAMNMNMNAMNMNMNMNMNMNMNYDDDDDwDAwDDwD YO 


See 
SRIF 


076312 
076334 


076346 
076364 


Dok ohvohoh oh oh oh ob oh 2) 

ee ee ee ee ees 
ee ae a et oe wd 8 
OONAUSWN—O 


CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


07607 


MACRO M1111 24-SEP-79 15:03 PAGE 53-5 


046435 
046455 


046435 
001244 


DT67=DT4 
DT70=DT4 
DT176=DT4 
8 ae 


DT102=DT6 
DT103=DT73 


52=DT4 
=DT4 


$STMPO,STMP1,$TAB,STMP2,SCRLF ,MS3,$TMP3,$CRLF ,MS1 
STMP5 ,SCRLF ,MS2,$TMP4,0 


$TMPO,$TMP1,$TAB,STMP2,$CRLF .MS4,$1TMP4 
SCRLF .MS1,$TMP5,$CRLF ,MS2,$TMP3,0 


SEQ 0224 


C 
S 
x 
x 
Y 
x 
x 
X 
x 
x 
x 
x 
x 
x 
x 
x 
x 
Y 
Y 
Y 
Y 
Y 
Y 
Y 
.] 
y 
y 
\ 
\ 
) 
) 
\ 
) 
) 
) 
) 
) 
) 
\ 
) 
i 
‘ 
4 
{ 
4 
‘ 
‘ 
4 
‘ 
‘ 
‘ 
¢ 
d 





cs. 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24-SEP-79 15:03 PAGE 33-8 
FLAG RESET AND CONSOLE TEST ROUTINE 


9163 076120 DT154=DT5 
9164 076076 DT155=DT4 
9165 076076 DT156=DT4 
9166 076120 D1157=DT5 
9167 076076 DT160=DT4 
9 26076 DT161=DT4 
9169 076120 DT162=DT5 
9170 076076 DT163=DT4 
9171 6076 DT164=DT4 
9172 076076 DT215=DT4 
9173 076120 DI216=DT5 
9174 076076 DI217=DT4 
9175 076076 DI220=DT4 
9176 076076 DT221=DT4 
9177 076120 DT222=DT5 
9178 76076 DT223=DT4 
9179 076076 DT224=DT4 
9 076202 DT165=DT37 
9181 076202 D1166=D137 
9182 076202 DT167=DT37 
9183 076202 DT170=D137 
9184 076202 DT171=DT37 
9185 076202 DT172=DT37 
9186 076246 DT173=DT41 
9187 076246 DT174=DT41 
9 76246 DT175=DT41 
9189 076202 0T200=DT37 
9190 076202. D1201=D137 
9191 076202 DT202=DT37 
9192 76202 DT203=DT37 
9193 076202 DT204=D137 
9194 076202 DT205=DT37 
9195 076202 DT206=DT37 
9196 76202 DT207=D137 
9197 076202 DT210=DT37 
9198 076202 DT211=D137 
9199 076202 DT212=DT37 
92 76202 DT213=D137 
9201 076202 DT214=D137 
9202 076076 DT225=DT4 
9203 076076 DT226=DT4 
076146 DI227=D16 
9205 076076 DT230=DT4 
92 076076 DT231=DT4 
9207 076146 DT232=DT6 
6076 DI233=DT4 
92 076076 DT234=DT4. 
9210 076146 _ oh DT 235=D16 
9211 076076 . DT236=DT4 
921 076076 ~*~ D1237=DT4 
921: 076146 DT240=D16 
92 1 du 076076 DT241=DT4 
9215 076076 DT242=DT4 
9216 076146 D1243=D16 
9217 076076 D1244=DT4 
9218 076076 DT245=DT4 


9219 076076 DT246=DT4 


SEQ 0225 


- 


CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


076510 
3 


076526 
076546 


076572 


076612 
2 


076146 


076526 


001234 
046477 


001234 
046477 


MACRO M1111 


046435 
001240 


046435 
001240 


DT247=DT6 


. WORD 
D1T302=DT301 
DT303: .WORD 

WORD 


WORD 


DT304=DT301 


Ge 
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STMPO,STMP1 ,$TAB,STMP2,.$TAB,STMP7 ,$TAB, STMP10 
SCRLF .MS10,$TMP3,S$CRLF .MS11,$TMP4 
SCRLF .MS1,$TMP6,$CRLF ,MS2,$TMPS5 ,0 


STMPO,STMP1,$TAB,STMP2, STAB, coe STMP11,$7MP12 
SCRLF .MS10,$TMP3,$CRLF .MS11, 
SCRLF .MS1,$TMP6,$CRLF .MS2, sinps, 3 


$TMPO,STMP1 ,$TAB, STMP2.$TAB,STMP7, STAB, STMP10 
SCRLF .MS10,$TMP3,$CRLF .MS1,$TMP4,SCRLF .MS2,$TMP5S,0 


STMPO,STMP1 STAB, STMP2,$TAB,STMP7,STMP11,$TMP12 
SCRLF .MS10,$TMP3,$CRLF .MS1,$TMP4 ,SCRLF MS2,$TMPS ,0 


SEQ 0226 





CKFPCAO FP11F FLTG PNT PRT C 
FLAG RESET AND CONSOLE TEST ROUTINE 


0 0 
5 077024 


076526 


MACRO M1111 


DT332=DT322 


DT415=DT4 


H 2 
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$TMPO, $TMP1,$TAB, $TMP2, STAB, $TMP3,0 
$TMPO.$TMP1.$TAB. “STM I$, $TAB,$TMP2, $TMP3,0 
$TMPO.$TMP1.$TAB.$TMP13.0 


STMPO,STMP1,$TAB,STMP13, STAB, STMP2 
STMPS .$ MP7 


.0 
$TMPO.$TMP1,$TAB.SIMP13, sie $TMP6,$TAB, STMP3,0 
$TMPO. STMPI STAB, $TMP2,$TMP13 
SCRLF .MS21,$TMP3,$TMP4. td $TMP7 
$CRLF .MS20.$TMP10,STMP11,$1MP12,$IMP21,0 


SEQ 0227 





CKFPCAO FP11F FLTG PNT PRT C 


FLAG RESET AND CONSOLE TEST ROUTINE 


2 
077042 
a 077060 


0071234 046435 
001234 046435 


MACRO M1111 


DT416=DT4 


D 

DT441: .WORD 
DT442: . WORD 
DT443=DT442 


24-SEP-79 15:03 PAGE 33-11 


$TMPO,$TMP1 ,$TAB,STMP2,$TAB,STMP3,0 
$TMPO,$TMP1,$TAB,STMP2,0 


SEQ 0228 






; J 
CKFPCAO FP11F FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE 34 
FLAG RESET AND CONSOLE TEST ROUTINE . SEQ 0229 


9362 312345 
9363 000001 


K 
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SYMBOL TABLE 


SEQ 0230 
AABBFO 013602 AMSGLG= 000000 CKSWR = 104406 DF 134 = 363 DF216 = 075411 
0 AMSGTY= 000000 NT = 000444 DF135 = 075411 DF217 = 075363 
AABTP1 013612 AMTYP1= 000000 CPSPUR 046250 DF136 = 075411 DF22) = 075411 
AABTP. AMTYP2= 000000 CPTWO 046270 DF137 = 075363 DF220 = 075363 
AABI 013424 AMTYPS5= 000000 CR ~ 15 DF14 = 075405 F221 = 07536 
1 AMTYP4= 000000 CRLF = 000200 DF140 = 075411 DF222 = 075411 
AABS 013546 APASS = 000000 DATA = 117760 DF141 = 075363 DF 223 = 075363 
APRIOR= 000000 DDBBFO 014230 ries = 075363 DF224 = 07536 
AACDON 023754 APTCSU= 000040 DDBD 014250 DF145 = 075411 DF225 075502 
AACTP1 APTENV= 000001 DDBTP1 014210 DF144 = 075363 DF 226 = 075502 
1 023600 APTSIZ= 000200 DDBTP2 014220 DF145 = 36 DF227 075512 
0 TSPO= 000100 DDBTPS 014240 DF146 = 075411 DF23 = 0754 
AAC11 =. 023702 G= 000000 DDB1 014036 DF147 = 36 DF230 = 075502 
AAC2 023634 ATESTN= 000000 DDB2 014102 DF1S§ = 075411 DF231 = 075502 
AAC20 §=023720 T = 000000 DDB5 014144 DF150 = 07536 DF232 = 075512 
ABASE = = 000000 DDB6 014172 DF151 = 075411 DF235 = 075502 
ACDW1 = 000000 AVECT1= 000000 DDCDON 024326 DF152 = 36 DF 234 = 07550 
ACDW2 = 000000 AVECT2= 000000 DDCTP1 024226 DF153 = 075363 DF235 = 075512 
ACPUOP= 000000 024132 DDC 024136 DF 154 = 075411 DF 236 = 075502 
Aco = BBCTP1 024040 DDC10 § 024240 DF155 = DF237 = 075502 
AC? =%000001 BBC 23760 DDC11 024256 DF156 = DF24 = 07536 
AC2 =%000002 BBC10 024044 DDC2 024174 DF157 = 075411 DF240 = 075512 
ACS = 3 BB8C11 =O. 2 DDC20 024274 DF16 = 075 DF241 = 075502 
AC4 =%000004 C2 024014 DDISP = 177570 DF160 = 075363 DF242 = 075502 
ACS =%000005 BBC20 024100 DF 1 075354 DF161 = 075 DF2435 = 075512 
AC6 = BITO = 000001 DF10 = 075373 DF 166 = 075411 DF244 = 075502 
AC7 =%000007 B1TOO = 000001 DF100 = 075363 DF 1635 = 07 DF245 = 075502 
ADDWO = 000000 BITO1 = 000002 DF101 = 075363 DF164 = 075363 DF246 = 075502 
ADDW1 = 000000 BITO2 = 000004 ' DF102 = 075405 DF165 = 075423 DF247 = 075512 
ADDW10= 000000 BIT03 = 000010 DF103 = 075465 DF166 = 075423 DF25 = 07541 
ADDW11= 000000 BIT04 = 000020 DF104 = 075363 DF167 = 075423 DF250 = 075502 
ADDW12= 000000 BITOS = 000040 DF105 = 075363 DF17_ = 075405 DF251 = 075502 
ADDW1 3= 000000 BITO06 = 000100 DF106 = 075405 DF170 = 075423 DF252 = 075502 
ADDW14= 000000 B1T07 = 000200 DF107 = 075405 DF171 = 075423 DF 2535 = 075512 
ADDW15= 000000 ‘B1T08 = 000400 DF11_ = 075363 DF 76 = 075423 DF 254 = 07550 
ADDW2 = 000000 BITO9 = 001000 DF110 = 075465 DF173 = 075444 DF255 = 075512 
ADDWS = 000000 BIT] = 000002 DF111 = 075363 DF174 = 075444 DF 256 = 075502 
ADDW4 = 000000 BIT10 = 002000 DF 16 = 075363 DF175 = 075444 DF257 = 075502 
ADDWS = 000000 B1T11 = 004000 DF1135 = 075405 DF176 = 075363 DF26 == 075405 
ADDW6 = 000000 sins = 010000 DF114 = 075465 DF177 = 075363 DF260 07 

ADDW7 = 000000 BIT13 = 020000 DF115 = 075363 DF2 75363 DF261 = 075516 
ADDWB = 000000 BIT14 = 040000 DF116 = 075363 DF 20 7536 Or see = 075516 
ADDW9 = 000000 BIT15 = 100000 DF117 = 075405 DF200 = 0754 DF 265 = 075516 
ADEVCT= 000000 BIT2 = 000004 OF So 075411 pres = 0754 ; DF 264 = 075516 
ADEVM = 000000 BITS = 000010 DF120 = 075465 DF oS = 0754 DF265 = 075516 
AENV. = 000000 BIT4 = 000020 DF121 = 075 DF = 07542 266 = 075516 
AENVM = 000000 BITS = 000040 DF 16 = 075363 DF = 07542 DF 267 = 075516 
AFATAL= 000000 BIT6 = 000100 DF125 = 075405 DF205 = 0754 DF27 = 075365 
1= 000000 BIT? = 000200 DF124 = 075465 DF = 075423 DF270 = 075516 
000000 BIT8 = 000400 DF125 = ete DF207 = 075423 DF271 = 075516 
AMADR3= 000000 BIT9 = 001000 DF126 = 07536 DF 21 075411 DF272 = 075516 
AMADR4S= 000000 BPTVEC= 000014 DF127 = 075405 DF210 = 07542 DF 27 075537 
AMAMS1= 000000 cc 013732 DF13 = 075405 DF 211 754 DF274 = 075537 
000000 CCB1 013636 DF130 = 075465 DF \¢ = 0754 DF275 = 075537 
AMAMS3= 000000 CCB10 013700 DF131 = 075363 DF215 = 0754 DF276 = 075537 
AMAMS4= 000000 CCB15 013716 ae = 075405 DF214 = 0754 ; DF277 = 075537 
AMSGAD= 000000 CCB2 013654 DF135 = 075465 DF215 = 07536 DF = 075363 


CKFPCAO FPI1IF FLTG PNT PRT C MACRO M1111 24=SEP=79 15:03 PAGE by 
SYMBOL TABLE 


SEQ 0231 
DF30 = 075411 DF362. = -075713 DF45 = 075423 DH127 = 074132 DH210 = 074261 
DF300 = 075537 DF363 = 075721 DF46 = 075423 DH1 074132 DH211 = 074261 
DF301 075 DF 364 = 075405 DF47 = 075423 130 = 074071 DH212 = 074261 
DF 302 = 075 DF365 = 075405 DFS 075373 131 = Oe 7ees DH2135 = 074261 
DF303 075604 DF366 075730 DF50 = 075423 etl a6 = 074132 DH214 = 074261 
DF 304 = 075560 DF367 49=— 07575 DF51 = 075423 DH1335 = 074071 DH215 = 074172 
DF305 = 075560 OF 37 07542 DF52 = 075423 DH134 = 073622 DH216 = 074071 
OF = 075560 DF370 075762 DF53 = 075423 DH135 = 074071 DH217 = 074002 
DF307 = 075560 DF371 = 000000 DF54 = 075423 DH136 = 074071 DH22_ = 074071 
DF31_ = 075405 DF372 = 000000 DF55 = 075423 137 = 073622 DH220 = 073622 
DF310 = 075560 DF 373 = 000000 DF56 = 075423 DH14 = 074132 DH221 = 074172 
DF311 = 075560 DF374 = 000000 DFS7 = 075423 DH140 = 074071 DH222 = 074071 
DF312 = 075560 DF375 = 000000 DF6 075405 DH141 = 074002 DH225 = 074002 
DF313 = 075560 DF376 = 000000 DF60 = 075423 tes = 073622 DH224 = 
DF314 = 075560 DF377 = 000000 DF61 = 075423 DH145 = 074071 DH225 = 074002 
DF315 = 075560 DF4 == 075363 eee = 075363 DH144 = 074002 DH226 = 07362 
DF316 = 075560 DF4O0 = 075423 DF635 = 075363 DH145 = 07. DH227 9396 074446 
DF317 = 075 DF400 = DF64 = 075373 DH146 = 074071 DH23_ = 074132 
DF32. = 075363 DF401 = 075502 DF65 = 075363 DH147 = 074002 DH230 = 074002 
DF 320 = 075 DF402 = 075502 DF66 = 075363 DH15_ = 074071 DH231 = 073622 
DF 321 = 075560 DF403 = 075512 DF67 = 075363 DH150 = 073622 32 = 07444 
322 075630 DF404 = 075512 DF? = = 075363 DH151 = 074071 DH235 = 074002 
DF323 = 075630 DF405 = 075502 DF70 = 075363 as = 074002 234 = 07362 
075651 DF406 = 075502 DF71 075465 DH153 = 073622 DH235 = 074446 
DF325 = 075630 DF407 = 075512 DF72 = 075363 DH154 = 074071 DH236 = 07400 
DF 326 = 075630 DF41 075444 DF73 = 075465 DH155 = 074002 237 = 073622 
OF = 075630 DF410 = 075512 DF74 = 075363 DH156 = 07 DH24_ = 07400 
DOF33_ = 075411 DF411 = 075502 DF75 = 075363 DH157 = 074071 DH240 = 074446 
OF = 075630 DF412 = 075502 DF76 = 075405 DH16 074172 DH241 = 074002 
DF 331 = 075630 DF413 = 075512 DF77 = 075465 DH160 = 074002 DH242 = 07362 
DF332 = 075630 DF414 = 075512 DH1 073547 DH161 = 073622 DH245 = 074446 
= 075630 DF415 = 075502 10. = 074071 tee = 074071 DH244 = 074002 
DF334 = 075630 DF416 = 075502 DH100 = 074002 DH165 = or Tees DH245 = 073622 
DF335 = 075630 DF417 = Or 22 101 = 07 DH164 = 07417 DH246 = 074172 
336 = 075630 DF42 = 07542 DH102 = 074132 DH165 = 074261 DH247 = 074 
DF337 = 075630 DF420 = 075512 DH103 = 074071 DH166 = ae eses DH25_ = 074071 
DF34 = 075405 DF421 = 075502 DH104 = Oo eeos DH167 = 074261 DH250 = 074 
DF = 075630 Oress = 075502 DH105 = 07. DH17_ = 074132 DH251 = 073622 
DF 341 = 075630 DF425 = 075512 DH106 = 074132 DH170 = BoeSe) Ons 2¢ = 074172 
DF 342 = 075630 DF424 = 075512 DH107 = 074132 DH171 = 074261 DH255 = Q7: 
DF 3435 = 075630 DF425 = 075502 DH11_ = 074002 pnes = 074261 DH254 = 074172 
DF 344 = 075630 $38 = 07550 DH110 = 074071 DH175 = 074351 DH255 = 074446 
DF 345 = 075630 DF427 = 07551 DH111 = 07400 DH174 = 074351 DH256 = 074002 
DF 346 = 075630 DF43 = 07542 pis = 3 DH175 = Br 423) 57 = 
a7 30"6 DF430 = 075512 DH115 = 0741 nee = 07 = 0741 
DF35_ = 07536 DF431 = fear DH114 = 074071 DH177 = 07371 = 074261 
= 075672 +3 = 07550 DH115 = 07400 DH2 07 1 = 074261 
DF351 = 075512 DF4335 = 07550 oot ts = 07 ise = 07400 = 074261 
OF = 075672 DF434 = 07551 DH117 = 0741 = 074261 = 074261 
DF353 = 075672 DF435 = 07551 iiSo = 074071 DH201 = 074261 = Boe 1 
DF 354 = 075672 DF436 = 07551 DH120 = 074071 . = 074261 5 = 074261 
DF355 = 075672 DF437 = 07550 DH121 = Bees = 074261 = 074261 
DF 356 = 075502 DF44 = fees DH1 § = 07 = 074261 = 074261 
DF357 = 075502 DF440 = 12008 DH125 = 0741 5 = 074261 = 074002 
DF36 = 075411 DF441 07600 DH124 = 074071 = 074261 = 074261 
DF 360 = 07551 DF442 = 07600 DH125 = P3008 = 074 3 71 = 074261 
DF 361 = 07550 DF443 = 07600 DH126 = 07 1 = 074071 DH272 = 074261 


CKFPCAO FP1IF FLTG PNT PRT C 
SYMBOL TABLE 


DH326 
DH327 = 074261 
DH33_ = 074071 
= 074261 
DH331 = 074261 
DH332 = 074261 
DH333 = 074261 
DH334 = 074261 
DH335 = 074261 
74261 


=0 


EReReEreg 


Psd 
Bee 


DH354 = 074261 


= 074261 
074132 


EEEEREEES 
Pa es py i 
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DT20 = 076160 
DT200 = 076202 


DT = 07620 
DT205 = 076202 
76202 


pw hw hw hw hw hw hw) wh ww hw) wh om) 

SS SS SS SS SS SS 
AAAAAAAMA SS 

nnnnunnnnnnnuun 


SEQ 0232 
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SYMBOL TABLE SEQ 0233 


DT = 076202 DT344 = 076526 DT426 = 076076 EM151 055005 
DT = 07620 DT345 = 076526 DT427 = 076146 EM15 055030 
DT264 = 07620 DT346 = 076526 D143. = 076202 EM15 055101 
DT265 = 076202 D347 = 076526 DT430 = 076146 EM154 823166 
DT266 = 076202 DT = 076160 DT431 = 076146 EM155 055151 
T = DT350 = 076526 DT432 = 076076 EM15 055222 
DT27 = 076160 DT351 = 076146 DT435 = 07607 EM15 055247 
270 = 076202 DT352 = 076526 DT = 46 EM16 047354 
DT271 = 076202 DT353 = 076526 DT435 = 076146 EM160 055271 
DT272 = 076202 DT354 = 076526 1436 = 076146 EM161 055363 
DT275 = 076202 DT355 = 076526 DT437 = 076076 aly) 055407 
DT274 = 076202 T356 = 076032 D144 = 076202 EM16 05543 
T = 076202 DT357 = 076054 T440 = 076076 EM164 05545 
DT276 = 076202 DT36_ = 076120 DT441 077042 EM165 056255 
DT277 = 076202 DT360 = 076146 DT442 077060 EM166 gaegrs 
7 DT361 = 076402 DT443 = 077060 EM167 056317 
DT3O0 = 076120 oT aes 076636 DT45 = 076202 EM17 047403 
DT300 = 076202 DT36 076654 DT46 = 076202 EM170 056340 
DT301 076402 7364 076674 DT47 = 076202 EM171 056363 
OT = 076402 DT365 = 076146 DTS 076120 EM17 056406 
DT30 076454 DT366 6076706 DT50 = 076202 EM17. 056431 
DT304 = 076402 DT367 076754 DT51 = 07620 EM174 056454 
DT305 = 076402 DT37 076202 DT52 = 076202 EM175 0564 
DT306 = 076402 DT370 §6076776 DT53 = 076246 EM17 0525 
D0T307 = 076402 DT371 = 000000 DT54 = 076202 EM 052613 
DT31_ = 076146 DT372 = 000000 DT55 = 07620 EM2 04665 
DT310 = 07 DT373 = 000000 DT56 = 076202 EM20 047441 
DT311 = 076402 DT374 = 000000 D157 = EM200 056522 
DI312 = 076402 DT375 = 000000 DT6 076146 EM201 056577 
DT3135 = 076402 DT376 = 000000 DT60 = ea 056 
DT314 = 076402 DT377 = DT61 = 07620 EM20 05 
DT315 = 076402 DT4 076076 D 6¢ = 076160 EM204 057161 
DI316 = 076402 DT40 = 076202 DT63 = 076160 EM205 Bere 
DT317 = 076402 DT400 = DT64 = 076120 enue 057335 
DT32. = 076160 DT401 = 076076 DT65 = 076160 EM20 057436 
DT320 = 076402 DT402 = 076076 DT = 076076 EM21 7502 
1 = 07 DT403 = 076146 D167 = 076076 EM210 7535 
DT32. 076526 DT404 = 076146 DT = 076076 EM211 057634 
DT325 = aes DT405 = 076076 DT70 = 076076 ons t¢ hs 
DT324 076 T7406 = 076076 DT7 76312 EM21 06004 
DT325 = 076526 DT407 = 076146 DT72 = 076076 EM214 060170 
DT326 = 0765 1 46 DT7 76346 EM215 055533 
DT327 = 0765. DT410 = 076146 DT74 = 076071 rf 1g 055664 
DTS. 076120 DT411 = 076076 T75 = 0760 EM21 8? 
DT330 = 076526 DT412 = 076076 oT = 0761 E = 
DT331 = 076526 DT413 = 076146 T = 076346 E 5 
oT = 076526 DT414 = 076146 EEBBFO 014404 pas 1 
DT335 = 076526 DT415 = 076076 EEBBF 14414 E § 1 
DT33%4 = 076526 DT416 = 076076 EE 14540 E 157 
DT335 = 0765. DT417 = 076146 EEBTP1 014 E 
DT336 = 0765 DT42 = 076202 EEBTP2 014374 E 1 
D1T337 = 0765. DT420 = 076146 EEB1 14254 E 
DT34 = 076146 DT421 = 076076 EEB) 14424 E 
DT340 = 076526 DT4 . = 076076 EEB1 14 E 
Hag a ee Sas 
= = 
OTacs = Oresoe DT425 = 076076 EE 014526 E g 
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SEQ 0234 
EM233 060516 EM315 064444 EMG 046741 EM62 052154 GGB20 015266 
EM234 060542 EM316 064545 EM4O 050272 EM63 052260 GGB25 015304 
EM235 060567 EM317 064646 EM400 = 000000 EM64 052306 GGCDON 025156 
EM32 050035 EM401 070503 EM65 052362 GGCTP1 025036 
EM237 EM320 47 EM402 070526 EM66 052405 GGC1 024744 
EM24 047564 EM321 065050 EM403 070550 EM67 052444 GGC10 25050 
EM240 73 EM322 (065151 EM404 070702 M7 047127 oGC11 
EM241 060725 065206 EM405 070732 EM70 052545 GGC2 
E242 060752 EM324 065245 EM406 = 070756 EM71 36 GGC20 025124 
EM243 EM325 04 EM407 071001 EM72 052655 GGC25 5104 
EM244 061032 = 04 EM41 050320 EM73 052736 GTSWR = 104405 
EM245 061056 EM327 065445 EM410 §=071134 EM74 052757 64 
EM246 061103 050076 EM411 071165 EM75 00 HHBBF1 015474 
EM247 EM330 065547 EM412 (071211 EM76 053024 015620 
5 047626 EM331 65652 EM413 9071234 EM77 3065 HHBTP1 015434 
EM2SO0 061165 EM332 067126 EM414 071367 ENDTES 042502 HHBTP2 015454 
EM251 061212 EM333 = EM415 071420 ENDTST 1 15324 
EM252 061240 EM334 9065755 EM416 9071445 ERM10 043532 HHB 10 15504 
EM253 061272 EM335 66051 EM417 = 071471 ERROR = 104000 HHB15 015540 
061324 096155 EM42 050346 ERRVEC= 000004 HHB2 015374 
EM255 061 EM337 066227 EM420 39071537 ERTYPE 04 HHB20 66 
EM256 061414 E 059721 EM421 = 071571 ERT1 045744 HHB25 1 
EM257 061442 EM340 1 EM422 = 071616 ERT2 046162 HHC 025410 
EM26 047652 EM341 33 EM423 9071642 ERT3 0461 HHCTP1 025262 
061471 EM342 = 066537 EM424 071710 ERT4 046176 HHCTP2 025272 
EM261 061526 EM343 1 EM425 9071742 ERTS 04 HHC1 025162 
EM262 061565 EM344 066743 EM426 =: 00711766 FALTRP 1156 HHC10 025302 
EM263 061665 EM345 067220 EM427 =: 072011 FFBBFO 014674 HHC11 025320 
EM264 061713 EM346 «=. 067320 EM43 050425 FFBBF1 014704 HHC2 025230 
EM265 0 EM347 067416 EM430 072144 FFBDON 015030 HHC20 025356 
E 062101 5 050160 EM431 9072175 FFBTP1 014654 HHC25 025336 
EM267 062214 EM350 067442 EM432 072250 FFBTP2 014 HT = 11 
EM27 047711 EM351 067470 EM433 072275 FFB 014544 IDONE 040012 
EM270 8062311 EM352 067574 EM434 072321 FFB10 3014714 I[IBBFO 015764 
EM271 062352 EM353 77 EM435 072455 FFB15 014750 1IBBF1 015774 
EM272 & EM354 7 EM436 072507 FFB2 014614 I] 016120 
062511 EM355 070110 EM437 FFB20 014776 IIBTP1 015734 
EM274 062546 EM356 070214 EM44 050531 FFB25 015014 IIBTP2 015754 
EM275 062605 EM357 070312 EM440 072612 FFCDON 024740 181 015624 
EM276 062705 E 050222 EM441 073426 FFCTP1 024632 11810 
063002 EM360 10 EM442 = 073462 FFCTP2 024 11815 16040 
E 7 EM361 072640 EM443 073514 FFC1 024542 11B2 015674 
EM30 047753 EM362 072663 EM45 FFC10 024652 11820 1 
E 063056 EM365 072773 EM46 050707 FFC11 024670 11B25 016104 
EM301 063153 EM364 73041 EM47 1013 FFC2 0246 IICDON 025524 
EM302 063177 EM365 = 073141 EMS 047001 FFC20 024706 11C1 025414 
EMS03 063225 EM366 073224 EMSO 051113 FPSPUR 046214 11C2 025442 
E 063253 EM367 073307 EMS1 051227 FPVECT= 000244 11C20 025514 
EM305 063342 EM37 050246 EMS2 051253 GGBBFO 015164 11¢3 25462 
EM306 063445 EM370 0733572 EMS3 pa 1eee GGBBF1 015174 INCDCT 040016 
EM307 3632 EM371 = 000000 EMS4 051323 GGBDON 015320 = 
EM31 047777 EM372 = 000000 EMSS 051402 GGBTP1 015144 IOTVEC= 0000. 
EM310 063734 EM375 = 000000 EMS6 051530 GGBTP2 015154 JBBFO 016260 
EM311 664037 EM374 = 000000 EMS7 051632 GGB1 015034 JJBBF1 016270 
EM312 064140 EM375 = 000000 E 047025 GGB10 015204 016414 
EM313 064242 EM376 = 000000 EM60 051742 GGB15 = 015240 JJBTP1 016236 
EM314 064343 EM377 = 000000 EM61 052052 GGB2 015104 JJBTP2 916250 
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SYMBOL SEQ 0235 
JJB1 016124 KKC5 026056 MACS 030536 00C10 032462 Q0B10 020424 
JJB10 016300 KKC6 026114 MMAC6 030614 00C15 032502 Q0815 020444 
JJB1S5 0163 KKC7 026152 MMC7 30672 032414 QQ82 020330 
JJ 016174 KKC8 026210 MMC8 030750 00C20 032524 QQB20 0204 
JJB20 16 KKC9 026246 Maco 031026 00C25 032546 QQCDON 033270 
JJB25_ 016400 LABEL1 04 MARO = 177572 OOODON 006726 QQCc TBO 36 
KDPARO= 1 LDCDSU MARE = 177576 OOOT 006636 QQCTB1 033142 
KDPAR1= 172362 LDCFSU 027020 MARS = 172516 0001 006572 QQCTB2 033152 
KDPAR2= 172364 LOCT 027224 MMVECT= 000250 0002 006616 QQCc1 033032 
KDPAR3= 172366 LDXSUB 031610 = 000443 0003 006652 QQC10 033156 
KDPAR4= 172370 LDXT 032100 MODE1 040472 06720 Q0C15 033176 
KDPAR7= 172 LF = 1 MS1 04643 PIRQ = 177772 QQc2 033104 
K 172320 LLBBFO 017042 MS10 = 046477 PIRQVE= 000240 QQC20 86033220 
KDPDR1= 17232 LLBBF1 017052 MS11 046537 QQC25 033242 
KDPDR2= 172324 LLBDON 017160 MS2 046455 020254 QQQBFO 00 
KDPDR3= 17 LLBTP1 017022 MS20 046562 PPBTP1 020162 
KDPDR4= 172330 LLBTP2 017032 MS21 046574 PPBTP2 020172 QQQD0N 007550 
KDPDR7= 172336 LLB1 016722 MS3 046477 020050 QQQTP1 
KIPARO= 172340 LLB10 06 MS4 046515 PPB10 020202 007172 
KIPARI= 172342 LLB15 = 017116 NATBF1 023562 PPB15 020222 QQ010 007372 
KIPAR2= 172344 LLB2 NATER1 023512 020116 QQQ2 007210 
KIPAR3= 172346 LLB25 = 017144 NATER2 023530 PPB20 020240 QQQ20 007412 
KIPAR4= 172350 LLCDON 030242 NATERS 023544 PPCDON 033026 QQQ22 8007426 
KIPAR7= 172356 LLC 027240 NATINS 023240 032700 Q0023 
KI 1 LLC10 = 02 NATRET 023524 PPCTB1 04 QQ024 007506 
KIPDR1= 172302 LLC2 7 NATSUB 023160 PPC1 032600 QQQ25 007532 
KIPDR2= 172304 LLC3 027354 0 017554 PPC10 032714 QQQ3 007246 
KIPDR3= 1 LLC4 027422 NNBDON 017634 PPC15 34 4 007274 
KIPDR4= 172310 LLCS 027470 NNBTP1 017534 PPC2 64 RDCHR = 104407 
KIPDR7= 172316 LLC6 027536 NNBTP2 017544 PPC20 032756 RESREG= 104411 
KKBBF O LLC7 NNB 1 017436 PPC25 RESVEC= 0000 
KKBBF1 016572 LLC8 027652 NNB10 «017564 PPPBFO 007070 20716 
016716 LLC9 027720 NNB11 =017614 PPPBF 1 RRBTP1 
KKBTP1 016532 L NNBIS 017620 007166 RRBTP2 020632 
KKBTP2 016552 LPERR = 104413 NNB2 017462 PPPTP1 007120 RRBTPS 
KKB1 MMBBFO 017314 NNCDON 032342 PPP1 006 R 020502 
KKB10 016602 MMBBF1 017324 NNCTBO 032214 PPP10 007130 RRB10 =O 4 
KKB15 016636 017432 NNCTB1 032220 PPP15 007150 RRB15 
KKB2 016470 MMBTP1 017264 C1 032114 PPP2 RRB2 020556 
KKB20 MMBTP2 7 NNC10 032230 PPPS 007012 020702 
KKB25 016702 1 017164 NNC15 032250 PPP4 007032 RC 033534 
KKCDON 027234 mmB10 380173 NNC2 032162 RRCTBO 033402 
KKC1 02 mMB15 017370 NNC20 032272 PRO = RRCTB1 0334 
KKC10 MMB2 01723 NNC25 032314 PRI = 0 RRCTB2 0334 
KKC11 026342 MMBCS 017416 NODAT 2406 PR2 = 100 RRC1 033274 
KKCi2 0 MMCDON 032110 20044 PRS = 000140 RRC10 033422 
KKC13 O MMC 1 030246 OOBTP1 017752 PRE = 200 RRC1S5 = 0334 
KKC14 026474 MMC 10 04 OOBTP2 017762 PRS = 000240 RRC2 033350 
KKC1S5 026 MMC11 4 =©031162 0081 17640 PR6 = 300 RRC20 §3 033464 
KKC16 026570 MMCI2 031240 00810 017772 PR? = 340 RRC25 033506 
KKC17 0. 6 MMC15 031316 00B15 020012 PS = 177776 RRR 010072 
KKC18 0. MMC14 = =031374 0082 017706 PSW = 177776 RRREXP 007722 
KKC19 0267 MMC1S 031452 00820 020030 PWRVE C= 24 RRRTP1 007702 
KKC2 025724 MMC16 «= 031530 OOCDON 032574 QQBD 0476 RRRTP2 007712 
KKC20 026760 2 030324 OOCTBO 032446 QQBTP1 020374 RRR1 007554 
KKC3 025762 MMC3 030402 OOCTB1 052452 QQBTP2 020414 RRR1M += 007732 
KKC4 026020 MMC4 030460 00C1 032346 0081 020260 RRR11 =: 007754 
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SEQ 0236 
RRR12 = =007774 SWREG 000176 TST25 015622 TTCTBO 034132 VVB15 014016 
RRR15 010026 SwO = 000001 TST26 §=©016122 TTCTB1 034136 VB2 013754 
RRR2 007632 SwOO = 000001 TST27 =©016416 TTCTB2 034146 VVCBFO 034474 
RRR2S 010006 SwO1 = 2 TST3 007170 TTC1 034012 VVCDON 034502 
RRR3 007634 SwO2 = TST30 §=©01672 TTC10 34152 VVCTP1 034462 
RRR4 007660 SwO3 = 000010 TST31 017162 TTC15 =. 034172 vvCc1 034402 
RSETUP=_ 104412 Sw04 = 000020 TST32 4 ©—017434 TTC2 034070 vvC2 034432 
R6 =%000006 SwOS = 0 TST33 © 017636 TTC20 034214 vvCc3 034442 
R? =%000007 Sw06 = 000100 TST34 020046 TTC25 034236 VVVBFO 011246 
SAVREG= 104410 SwO7 = 000200 TST35 020256 TTC30 = 0342 VVVDON 011356 
SCOPE = 000004 Swos = TST36 020500 TTTA1 010540 VVWVTP1 071256 
SPACE 046432 SwOo9 = 001000 TST37 =©920720 TTTA2 010542 vvv1 011126 
1 = 177574 Swi = 000002 TST4 552 TTTAS 10544 VVV10 =: 0011266 
Ss 021140 Sw10 = 002000 TST40 §=—021142 TTTBFO 010526 vvWV11 =: 011310 
SSBTP1 021044 SW11 = TST41 021352 TTTDON 010652 vvWv¥15 = 011322 
SSBTP2 021054 SW12 = 010000 TST42 021600 TTTTP1 010552 vvv2 011210 
SSBTP3 021 SW13 = 020000 TST43 022042 TTT1 010406 vvv20 011340 
$SB1 020722 SW14 = 040000 TST44 ©2234 TTT10 }=—©.010562 WWBDON 023574 
S$sB810 021 SW15 = 100000 TST45 023576 TTT11 010604 WWB 1 022316 
SSB15 021106 SWw2 = TST46 §=©—023756 TTT15 010616 WwWB2 022374 
S 021 SWw3 = 000010 TST47 = 024134 TTT2 010472 WW 3 022452 
SSB20. 021124 SWw4 = 000020 TST5 010074 TTT20 01063 WWB4 022530 
SSCDON 034 SWS = TST50 ©024330 TTT3 01 WWB5 022 
SSCTBO 033652 SW6 = 000100 TST51 024540 TYPE = 104401 WWB6 022664 
SSCTB1 033656 SW7 == 000200 TST52 024742 TYPOC = 104402 WWwB7 022742 
033540 Sw8 = TST53 = 025160 TYPON = 104404 02 
SSsc10 03 Sw9 = 001000 TST54 025412 TYPOS = 104403 023076 
SSC15 033706 = 11 TST5S §=©025526 021576 WWCDON 036144 
SSC2 033610 TBITVE= 000014 TST56 UUBTP1 021430 WwW 1 034 
SC 033730 TCCBFO 025642 TST57 027236 UUBTP2 021502 wWWC10 035146 
SSC25. 033752 TCCBF1 025652 TST6 0404 UUB1 1354 wWC11 035212 
SSC30 3400 TCCDON 025 TST 030244 UUB10 = 021512 WWC12 035256 
SSSA1_ 010244 TCC1 025530 TST61 §=032112 UUB15 021550 wWwC13 035322 
SSSBFO 010234 TCC2 025552 TST62 2344 021426 Ww 14 35 
SSSDON 010402 TCC3 025616 TST63 032576 UUB20. 021532 WWC15 035432 
SSSTP1 010254 TKVEC = 0 TST64 0335030 UUCBFO 03437 WwC16 035476 
SSSTP2 0264 TPVEC = TST65 033272 034376 wwC17 035542 
010076 T 037716 TST66 §=©033536 UUCTP1 034356 WwC18 35 
SSS10 010274 TRAPVE= TST67 = 034010 034276 WwC2 034552 
SSS11 010316 TRPV 041242 TST? 010654 uuCc2 034326 034616 
SSS15 010326 TRTVEC= 000014 TST70 034274 Uuuc3 034336 WW 5 034 
SSS2 010154 TST1 006570 TST71 034400 UUUA1 =011010 WC 6 034726 
SSS20 010344 TST10 =—6.0011124 TST72 034504 UUUA2 =011012 WC 7 034772 
SSS25. 010 TST100 042524 TST73 036146 011014 WC8 035036 
STACK = 001100 TST11 §=©011360 TST74 036216 UUUBFO 010776 WwC9 035102 
START 0061 TST12 011632 TST75 036730 011122 WwWBFO 011510 
STCDFS 0130 TST13 012466 TST76 = 037134 UUUTP1 011022 WwWwBF1 011530 
STCDT 013310 TST14 013322 TST77 ~=—04001 UUU1 010656 WWIDON 011630 
STCFDS 012172 TST15 013422 TT 021350 UUU10 §=011032 WAWTP1 011520 
STCFT 012454 TST16 013634 TTBTP1 021256 UUU11 = 011054 Wa | 011362 
STCIBF 036134 TST17 = 013734 TIBTP2 021266 UUU15 = 011066 WwW10 011540 
STCSUB 035654 TST2 006730 TTB 021144 010742 WW11 011562 
STKLMT= 177774 TST20 014034 TTB10 021276 ao 011104 WW15 011574 
STORE 042422 TST21 §©014252 TTB15 021316 UUU. 010766 alta? 011452 
STXBF 036714 TST22 014542 TTB2 Osi gle VVBDON 014032 W20 8011612 
STXSUB 036506 TST23 B1203s TTB20 021334 vvB1 013736 XXBD 022040 
001140 TST24 015322 TTCDON 034272 vVB10 014000 XXBTPT 021726 
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SYMBOL SEQ 0237 
XXBTP2 021736 272215 = 013404 SEOPCT 042552 SNWTST= 000001 $TESTN 001322 
XXB1 021602 2222 013342 SERFLG 001103 SOCNT 044404 $TIMES 001302 
XXB10 021766 SAPTHD 006072 $ 001115 SOMODE 044406 $TKB 001146 
XXB15 022006 SATYC 044434 SERROR 043276 SOVER 043260 $TKS 001144 
x 021654 SATY1 044410 SERRPC 001116 $PASS 001324 $TMPO 001232 
XXB20 20 SATYS) 044416 SERRTB 001442 SPASTM 006100 $TMP1 001234 
XXB25 021746 SATYS 044426 SERTTL 001112 SPWRAD 045540 STMP10 001252 
XXCDON SAUTOB 1134 SESCAP 001304 SPWRDN 045400 $TMP11 001254 
XxC1 036150 SBASE 001372 SETABL 001336 045534 $TMP12 001256 
XXX IN 012464 $BDADR 001122 SETEND 001442 SPWRUP 045452 $TMP13 001260 
XXX | 011634 SBDDAT 001126 SFATAL 001320 $QUES 001312 $TMP14 001262 
XXK2 011710 S$BELL 1306 SFFLG 044654 $RDCHR 045140 STMP15 0012 
XXX3 64 $CDW1 001376 SFILLC 1156 $RDSZ = 000001 STMP16 0012 
XXKG 012040 $CDW2 001400 SFILLS 001155 $REGAD 001160 $TMP17 001270 
XXx5 012114 SCHARC 044156 $GDADR 001 $REGO 001162 STMP2 0012 
Y 022312 SCKSWR 044656 SGDDAT 001124 001164 STMP20 001272 
YYBTP1 022176 $CLR.T 042726 $GET42 042710 $REG1O 001202 STMP21 001274 
YYBTP2 022 SCMTAG 001100 SGTSWR 044726 $REG11 001204 STMP22 001276 
YYBTP3 022216 $CM1 = 000024 $HD = 3 $REG12 001206 $STMP23 001 
YYB1 02 $cM2 = 000050 $HIBTS 006072 $REG13 001210 STMPS 001240 
YYB10 022240 $CM3 = 000024 SICNT 001104 $REG14 001212 STMP4 = 001242 
YYBi5 $CM4 = 4 LLUP 045556 $REGIS 001214 STMPS) = 001244 
YYB2 022124 SCNTLG 045265 SINTAG 001135 $REG16 001216 STMP6 001246 
YYB20 022276 SCNTLU 5260 SITEMB 001114 $REG17 001220 $STMP7 = =001250 
YYB25 220 $CPUOP $LF 001314 $REG2 001166 $™TN = 000100 
YYCDON 036726 SCRLF 001313 $LFLG 044653 $REGZO 001222 $TPB 001152 
vYCcl 036220 $ODWO 001402 $L 043004 $REG21 001224 STPFLG 001157 
YYC2 036256 $DDW1 0014 SLPADR 001106 SREG22 001226 STPS 001150 
yYc3 036314 $DDW10 00.426 SLPERR 001110 $REG23 01230 STRAP 045314 
YYC4 036352 $DDW11 0014 R1 001350 $REGS 001170 STRAP2 045336 
yycs 0 $DDW12 001432 SMADR2 001354 $REG4 001172 STRP = 000014 
YYC6 036446 $DDW15 0014 S$MADR3S 001360 $SREGS 001174 STRPAD 045350 
YYYDON 320 $ODW14 0014 SMADR4 001364 $SREG6 001176 STSTM 
yyY1 012470 $DDW15 001440 SMAIL 001316 $REG7? 001200 STSTNM 001102 
vYY2 012544 SDDW2 001406 SMAMS1 001346 SRESRE 043572 STYPE 
yyy3 620 $DDW3 001410 SMAMS2 001352 T 043006 STYPEC 04404 
YYY4 012674 SDDW4 001412 SMAMSS 001356 S$RTRN 043002 STYPEX 044160 
yyy5 012750 SDDWS 001414 SMAMSS4 001362 SSAVRE 043534 S$TYPOC 4% 
ZZCBF §=©037120 SDDW6 001416 SMBADR 74 SSAVR6 045562 STYPON 044222 
ZZCOON 037132 $DDW7 = 001420 SMFLG 044652 SSCOPE 043016 STYPOS 044162 
2ZC1 03673. $ODWB = 001422 SMNEW 045303 SSETUP= 000137 SUNIT 13 
22C19 =037072 SDDW9 001424 SMSGAD 001332 $STUP = 177777 SUNITM 006102 
2ZC12 = 037106 SDEVCT 001326 SMSGLG 001334 SSVLAD 043224 SUSWR 001342 
ZZC15 = O37112 SDEVM 001374 SMSGTY 001316 $SVPC = 006072 SVECT1 001366 
ZZC2 36 SDOAGN 042746 SMS 045272 $s = 177400 $VECT2 001370 
2Z¢3 SENDAD 0427 SMTYP1 001347 SSWREG 001340 $XTSTR 043030 
22¢5 037066 SENDCT 0425 SMTYP2 001353 $s = SSGET4= 1 
Z2ZF1 037136 SENULL 043012 SMTYPS 001357 SSWRMS= 000200 SOFILL 044405 
ZZZDON SENV 0013 SMTYP4 001363 $ 046435 -LPER 046310 

013324 SENVM = 001337 SMXCNT 043274 $TBIT 943010 «RSET 046316 
27210 : SEOP 042524 $NULL 001154 TERM = 000030 -$X = 006072 
- ABS. 077072 

000000 


001 
ERRORS DETECTED: 0 
VIRTUAL MEMORY SED: 58592 WORDS ( 229 PAGES) 


DYNAMIC MEMORY: 20746 WORDS ( 79 PAGES) 
SEQ 0238 


